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This manual provides information concerning the Texas Instruments DX980 
General Purpose Operating System for use by programming personnel work- 
ing with the system. The information is divided into eight sections and four 
appendixes as follows: 


PREFACE 


I, INTRODUCTION - This section describes the operating system and 
its components to provide an overview of its capabilities. 


II, JOB CONTROL LANGUAGE - This section introduces the Job Con- 
trol Language used in the system and details the required parameters 
and formats of JCL commands, 


II, INPUT/OUTPUT STRUCTURE - This section explains the organiza- 
tion of I/O handling routines and lists the I/O Supervisor Calls. 


IV. DISC FILE MANAGEMENT - This section describes the storage of 
data in disc files and how the operating system controls that opera- 
tion, 


V. SUPERVISOR CALLS - This section lists and describes the super- 
visor calls available for programmer use, 


VI BATCH PROCBSSING SUBSYSTEM Th: etinn xplains the three 


hw d bh AY tH OY i do tev 4011S s@ecrion }€ 


component subsystems that handle batch processing for the system, 


VII, INTERACTIVE TERMINAL SUBSYSTEM - This section describes 
the operation of the subsystem that provides interactive communica- 
tion between the terminal users and the operating system. 


Vill, UTILITIES - This section describes the characteristics of the 
utility programs available for use with the operating system, 


A. ERROR MESSAGES - This appendix lists DX980 error messages 
and definitions. 


B. RECOMMENDED JCL SEQUENCES - This appendix provides sample 
listings of JCL sequences for the operating system. 


C. ADDING TO ITS - This appendix provides detailed descriptions of 
the Interactive Terminal Subsystem as an aid to adding new applica- 
tion programs to run under the subsystem. 


D. ADDING NON-STANDARD DEVICES TO DX980 - This appendix de- 
scribes the procedure for designing a device service routine to ser- 
vice a device not normally supplied with the operating system. 
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An alphabetical index of key phrases also appears at the back of this manual, 
In addition to this manual the user should also have access to the following 
manuals that are referenced as applicable within the text of this manual: 


DX980 General Purpose Operating System, System Operator's Guide, 
Part Number 943004-9701 


Model 980 Computer, Basic System Use and Operation, Part Number 
961961-9710 


Model 980 Computer, Terminal User's Guide, Engineering Data, Part 
Number 943010-9701 


Model 980 Computer, Terminal User's Guide, Model 733 ASR/KSR Data 
Terminal, Part Number 943009-9701 


Model 980 Computer, Terminal User's Guide, Model 912 Video Display 
Terminal, Part Number 943014-9701 


Model 960 Computer and Model 980 Computer Debug User's Guide and 
Operating Instructions, Part Number 942 760-9701 


Model 980 Computer FORTRAN, Part Number 944800-9701 


Model 980 Computer Assembly Language Input/Output, Part Number 
961961-9734 


Model 980 Computer Assembly Language Programmer's Reference 
Manual, Part Number 943013-9701 
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SECTION I 
INTRODUCTION 


1.1 GENERAL 


DX980 is a general purpose operating system that supports the Texas Instru- 
ments 980 Series minicomputers with major features that include the follow- 


ing: 
® Interrupt driven device handlers 
e Multiprogramming with biased addressing and protected memory 
bounds 
® Flexible job management with complete resource allocation 


® Comprehensive data management 

e Dynamic memory management 

& Priority scheduling of jobs and of tasks within jobs 

® Subsystems to support batch and interactive terminal processing 
These system attributes augment computer performance for application in the 


following areas: 


mies — | 


e Interactive information management systems that allow terminal 
devices to enter, retrieve and display data stored in an online disc 
information base. 


e High speed, real-time computing systems that provide both analog 
and digital data acquisition, and that include control loops that re- 
quire the computational capacity of a 980 computer. 


° Batch processing environments for program development, scientific 
data processing and business applications. 


e Combinations of the above systems for specialized applications. 


1.2 HARDWARE REQUIREMENTS 


The operating system nucleus occupies approximately 24,000 words of main 
memory and requires the following additional system hardware: 


® Additional memory for support of subsystems, language processors, 
and application programs. 


e Either a moving head disc or a DS330 disc system. 


e Magnetic tape drive to initially load the disc, to allow a dump of the 
disc contents for reloading, and to provide offline storage. 
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® Operator console for system interaction with the user. 
(Model 733 ASR terminal or equivalent) 


e Interval timer. 


1.3 HARDWARE EXPANSION 


In addition to the required hardware for operation of the system, DX980 sup- 
ports a full 64K word memory computer system. The modular construction 
of the system allows easy addition of new peripheral devices and their re- 
lated service routines. Standard device service routines include support for 
one or more of each of the following peripherals: 


e Texas Instruments Model 733 ASR Terminal, Part Number 
966645-0003 


e Texas Instruments Model 733 KSR Terminal, TI Part Number 
966671-0003 


e Teletype Model 33 ASR Teletypewriter, TI Part Number 
973346-0001 


e Texas Instruments Model 912 CRT display unit, TI Part Number 
973306-0012 


e High Speed Paper Tape Reader/Punch Combination, TI Part 
Number 973526-0003 


e High Speed Paper Tape Reader, TI Part Number 965946-0003 


e 132 Column I/O Bus Line Printer, TI Part Numbers 966792-0001 
and 966792-0011 


e 80 Column DMAC Line Printer, TI Part Number 217065-0001 
® Card Reader, TI Part Number 966323-0003 
® Analog-to-digital and digital-to-analog conversion equipment 


e DS330 Disc Controller and Disc Drive System, TI Part Numbers 
942541-0002, 942541-0003, 942541-0004, 942541-0005, and 
942541-0006. 


e Moving Head Disc, TI Part Number 955157-0001 


e Texas Instruments Model 979 Tape Transport, TI Part Number 
217536-0001 


1.4 SYSTEM STRUCTURE 


The operating system is divided into a nucleus for executive functions common 
to most operations, and several subsystems that perform specific functions. 
In addition to the nucleus, two subsystem modules are supplied with the 
standard operating system: the Interactive Terminal Subsystem (ITS) and the 
Batch Processing Subsystem (BPS). Figure 1-1 illustrates the relationship 


pe eg eS nn 
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Figure l-l. DX980 General Structure 


of these subsystems to the nucleus. Other subsystems may also be added to 
perform functions suited to special applications. The following paragraphs 
describe the characteristics of the standard system components. 


1.4.1 NUCLEUS 


The nucleus is the portion of the operating system that defines the system 
parameters, handles input and output servicing, and provides real time 
reaction to the subsystems. The nucleus is divided into four main parts: the 
system table, the memory resident code, the procedure pool or system over- 
lay area, and a Dynamic System Control Area (DSCA). The real time fea- 
tures of the operating system are integrated into these areas and do not form 
a separate subsystem as do the Interactive Terminal Subsystem and the 
Batch Processing Subsystem. Real time features include rollin and rollout, 
task synchronization supervisor calls, dynamic device allocation, the ability 
to start other jobs via a supervisor call, and a method for controlling file up- 
dating with multiple online users. Most of the code for these features oc- 
cupies main memory only when in direct use and runs in the procedure pool. 


i,.4,1.1 SYSTEM TABLE. The System Table describes the operating 
parameters of the system including: system job parameters, system wide 
control blocks, and pointers to system queues, the DSCA, procedure pool 
and free area. The table is created during system generation. 


1.4.1.2 MEMORY RESIDENT CODE. Memory resident code is that portion 
of the operating system that is always in main memory. This code performs 
the following functions in the DX980 system: interrupt processing, system 
disc device handling, task management, preliminary supervisor call process- 
ing, memory management, overlay management, and commonly used lower 
level system subroutines. 


1.4.1.3 PROCEDURE POOL. The procedure pool is a dynamically allo- 
cated memory area used for system overlays. Approximately 80% of the sys- 
tem routines run in this area. These routines include: device service rou- 
tines not handled by the memory resident code, job management, file 


er 
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management, operator communications, and modules of rollin and rollout. 
The user can select the size of the procedure pool to adapt the amount of 
memory available to the operating speed required. 


1.4.1.4 DYNAMIC SYSTEM CONTROL AREA (DSCA). The DSCAisa 
volatile memory pool that is used by the procedure pool routines. Most of 
these routines are written in reentrant code. The DSCA provides a desig- 
nated work area for each task executing a procedure pool routine. The user 
can select the size of the DSCA. 


1.4.2 INTERACTIVE TERMINAL SUBSYSTEM (ITS) 


The Interactive Terminal Subsystem (ITS) provides simplified concurrent 
communications with several terminals. Included in ITS is the ITS Super- 
visor (ITSUPV) and the Interactive File Editor (IFE). ITSUPV manages the 
terminals, and provides LOGON and LOGOFF functions plus the required 
housekeeping functions for multi-terminal usage. ITSUPV interfaces easily 
with user written application programs. IFE provides interactive generation 
and editing of disc files containing source text. 


The ITS Supervisor initially checks the system's logical and physical device 
tables to derive a list of the terminals with which it can communicate (polling 
list). This list is based on the logical units assigned to the ITS at job start- 
up time. The ITS then assigns to each of the terminals on the list: 


® A buffer for data exchange with the terminal 
° A User Control Block 


The User Control Block contains pointers, flags, and a scratch pad memory 
space for use by application programs operating under ITS. One key param- 
eter in the control block indicates which body of code, or application pro- 
gram, is currently attached to the terminal. A single Command Table is 
available to ITSUPV for all terminals. The Command Table contains the 
names and entry points of the programs that can be run under ITS. After 
logging on, the terminal operator, through the ITS Supervisor, can select 
one of the programs in the Command Table for execution. Similarly, after 
completion of that program the operator can select another program. 


The ITS uses a Branch and Link command to pass the data exchange buffer 

to the selected application program. That program then processes the input 
and places any response to the terminal in the data exchange buffer. When 
the application program returns control to the ITS, the program may instruct 
the ITS to do any of the following operations: 


e Write the contents of the data exchange buffer on the corresponding 
terminal and return to the application program for more processing. 


e Write the contents of the data exchange buffer on the corresponding 
terminal, acquire a response from the terminal, and return for more 
processing. 
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e Read input from the terminal and return for more processing. 


e Return for more processing as time becomes available without 
intervening I/O operations. 


® Discontinue use of this application program by the terminal and 
indicate readiness for the operator to select a new application pro- 
gram. 


1.4.3 BATCH PROCESSING SUBSYSTEM (BPS) 


The Batch Processing Subsystem (BPS) consists of three data handling sub- 
systems that allow convenient batch input and output for the operating sys- 
tem. The three data handling subsystems are Batch Input Reader (BIR), 
Batch Input Spooler (BIS) and Batch Output Spooler (BOS). Any of these sub- 
systems can be activated from the system console by addressing a RUN com- 
mand to the proper subsystem. 


1.4.3.1 BATCH INPUT READER (BIR). Specifying BIR causes the oper- 
ating system to activate the assigned card reader and read input directly 
from that device. 


1.4.3.2 BATCH INPUT SPOOLER (BIS). Specifying BIS instructs the op- 
erating system to activate the assigned card reader, read input continuously 


that Aarric dad coov the inout data to a dise file ( lin Process- 


from LiLae aevice, ana VeUpPyY 14 thse u tv &@ UsLASw 4440 (spooling). 
ing can then proceed via the disc file (SYSIN) in parallel with the input oper- 
ation to increase throughput. 


1.4.3.3 BATCH OUTPUT SPOOLER (BOS). Specifying BOS instructs the 
operating system to access from the disc all data assigned to unit SYSOUT. 
The data is read from the disc and printed on the system output device | 
(usually a line printer). This feature allows data to be spooled on the disc 
during execution of a job by specifying the output unit as SYSOUT. When the 
output device becomes available, the operator can then activate BOS to dump 
the spooled data on that device. Use of BOS in this manner significantly in- 
creases throughput. 


1.5 INPUT/OUTPUT MANAGEMENT 


User programs running under DX980 select I/O devices with a logical unit 
number (LUN) rather than a physical device number. A statement within 

the JCL input for the job equates the LUN to a physical device name, while 

a physical device table for the operating system specifies an actual I/O de- 
vice to respond to the physical device name. This arrangement allows the 
I/O device assignments within the operating system and the logical unit num- 
bers within the user program to remain constant. A simple change to the 
JCL input allows the user to change the I/O medium. The operating system 
includes a Device Service Routine (DSR) for each I/O device supported by the 


a a ee 
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monitor. Each DSR translates the common program I[/O interface to the 
unique I/O interface required by its type of I/O device. The physical device 
table ties a particular I/O device to the DSR that services it. Additional 
DSRs can be added to the system to support new I/O devices without serious 
change to the system. 


1.6 MEMORY MANAGEMENT 


All of memory that is not occupied by the resident operating system, system 
tables, and the procedure pool is designated as a free area. The operating 
system dynamically allocates this area to subsystems and to user jobs. When 
a program is loaded into memory, the operating system stores it in contig- 
uous locations in a single partition within memory. It then loads the upper 
and lower bounds of that partition into the hardware memory protect address 
registers of the memory controller, and enables the hardware Priviledged 
Instruction Feature. All program parameters can then be referenced with a 
relative address with respect to the lower bound of the memory partition 
since the hardware automatically biases the addresses with the lower bound 
address. The operating system allocates memory partitions to particular 
jobs on a best fit basis. 


1.7 PROGRAM HANDLING 


Programs run under DX980 are performed as jobs; each job is further 
divided into tasks. The following paragraphs explain these concepts with 
respect to the operating system. 


1.7.1 JOBS 


A job is a unit of work in the DX980 system. A job consists of a set of user 
tasks to be executed and the control information to communicate resource 
requirements to the system. The system runs each job when all required 
resources become available. When a jobis complete, all allocated resources 
are returned to the system. They may then be allocated to another job as 
necessary. If the system has adequate resources, more than one job can be 
active at one instant. Each job competes for execution time on a priority 
basis. 


Jobs can be submitted to DX980 through the Batch Processing Subsystem 
(BPS), the Interactive Terminal Subsystem (ITS), the system console, or 
from another user job. The job submission procedure is the same regard- 
less of source. 


Once DX980 accepts the control information required to start a job, it places 
the information in a priority queue, called the job queue. Part of the job 
queue resides in main memory and part resides in a random access file on 
the system disc. As resources become available from jobs currently in 
execution, either through job termination or a specific request to release 
one or more resources, DX980 determines whether the additional resources 
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are sufficient to execute one of the jobs in the job queue. If so, the system 
changes that job's state from Ready to Running and starts the job. 


Each job in DX980 is requested with Job Control Language (JCL), and com- 
municates with the operating system using supervisor calls. A series of 
jobs may be combined into related job steps to perform a larger function, 
such as Compile, Link and Execute. In addition, a job may subdivide itself 
into two or more concurrently resident tasks. All user jobs run in protected 
mode and must remain within the memory bounds defined for that job. 


1.7.2 TASKS 


A task is a currently active program that coexists in memory with other con- 
current tasks, all of which may be in various stages of completion. One or 
more tasks combine to form a job. Tasks within a job may execute concur- 
rently and share the same reentrant body of code though each task is ina 
different state of execution. All jobs initiate as a single task. The initial 
task then issues supervisor calls to activate other tasks within its job area. 
Each separate task has its execution environment (register contents) and re- 
ceives a relative priority rank with other concurrent tasks. 


ie FILES 


A file is an organized collection of information. The file is divided into rec- 
ords that may be held in main memory while being used, but are stored on a 
disc when not being used. The following paragraphs describe the organiza- 
tion of files, the types of files available with the operating system, and the 
file handling features of the operating system. 


1.8.1 FILE ORGANIZATION 


. 
ya 34 £7 
nea single Gisc unit ror 


the Dx980 pperut nie ay atetn: The ee m locates a specific file with a three 
parameter entry supplied by the user. The<volume> parameter specifies the 
disc drive unit that contains the file, and allows the system to access the 
Master File Directory for that disc unit. The Master File Directory lists 
all of the User Directories that are stored on that disc unit, and the physical 
disc addresses used to locate each directory. A second parameter, < fileid>, 
tells the operating system which of the User Directoriés contains the file. 
The system then calls up the proper User Directory, which lists all of the 
files on the disc unit for that user, and their location on the disc. A third 
parameter, <filnam>, tells the operating system which of these files to ac- 
cess for the required information. 


Volume number | is always the system disc unit containing all of the oper- 
ating system files. Therefore, systems with only one disc unit must label 
that disc as volume 1. Within the Master File Directory for the system disc 
is an entry for the SYSTEM User Directory. This directory lists all of the 
files that are part of the operating system. One of these files, SJCBFL, 
contains the Job Control Language (output of the JCL Translator program) for 
the system. Another file, JCLSRC, is the JCL source file. 
a 
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Figure 1-2. Organization of Data Files within a Disc Drive 


1.8.2 FILE HANDLING 


The operating system provides the user with the following features when 
working with files: 


e File protection through both creator access and password entry; 
for either type of protection the user can specify whether it will be 
applicable for reading, writing or deleting, or any combination of 
those functions. 


® Maintenance of several User Directories, so that files can be 
segregated in a multi-user environment. 


OO 
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e File mapping performed by the system can also be assisted by a 
user request for a specific physical location to store a file. 


® Specification of exclusive files for use by one job only, or of shared 
access files for concurrent use by more than one job. 


@ Momentary cooperative locking of shared files during update to pre- 
vent degradation; this feature prevents one job from destroying a 
file update made by another job within an interactive information 
management system. 

e Blocking of multiple logical records into physical records for data 
transfer and storage; these blocked records are built and disas- 
sembled in buffer areas within the job extension area of main mem- 
ory. 


1.8.3. TYPES OF FILES 


The operating system supports three types of files as outlined in the follow- 
ing statements: 


@ Linked Sequential File - The records of this file are scattered 
throughout the storage medium, but are chained together by pointers 
within the file. This arrangement requires that the record be ac- 
cessed in sequential order, but also allows the file to grow dynam- 
ically like a magnetic tape file. 


e Relative Record File - This type of file contains records of a speci- 
fied length that can be accessed randomly within the file by their 
relative position to the beginning of the file. Records are allocated 
in contiguous storage space. 
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tree structure for efficient location of each record. The keyed 
records can then be stored in non-contiguous areas, allowing the 

file to grow dynamically. A key indexed file may also include non- 


keyed records that are accessed sequentially with keyed records. 
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SECTION II 
JOB CONTROL LANGUAGE 


2.1 GENERAL 


Job Control Language (JCL) specifies the structure and resource require- 
ments of jobs submitted to DX980. Other commands, used to request special 
action from DX980, are described in the DX980 General Purpose Operating 
System, System Operation Guide under the title of Operator Communications. 


2.2 JOB CONTROL LANGUAGE STRUCTURE 


Each job submitted to DX980 consists of one or more independent job steps 
that are executed in the order in which they appear in the job stream. For 
example, if two job steps are submitted, they will be executed in the order 
of step one and then step two. If any step aborts because of an error condi- 
tion, all subsequent steps will not be executed. 


Job steps would normally be combined in such a way that the successful exe- 
cution of each step depends on the successful completion of all preceding 
steps. A common example is a sequence of four steps to compile (2 phases), 
link and execute a FORTRAN program. The link step would be started only 
if the compilation was successful, and the execution step would be started 
only if both the compilation and link were successful. 


Within the JCL statements for each step are assignment commands to asso- 
ciate Logical Unit Numbers (LUNs) specified in the user program with phy- 
sical devices or files. These commands allow the user to specify Input/ 


Cy tL wma lawanon s Mm i 
Output references logically when a program is created and defer the actual 


device assignments until the program is run (runtime), For most sequential 
devices the assignment command merely links a LUN to the device. Fora 
disc file, however, the user must specify the type of file to be assigned, 
whether the file is new, old or temporary, blocksize of the data records, 
and disposition of the file after termination of the job step. 


2.3 JCL PROCESSING 
There are two forms of Job Control Language (JCL): expanded JCL and 
abbreviated JCL. 

NOTE 


In the following discussion and throughout the man- 
ual, the term ''card image''is equivalent to ''source 
line image" and is applicable to other input devices 
as well as a card reader. 
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2.3.1 EXPANDED JCL 


Expanded JCL can specify the structure of individual job steps, the location 
of the object program (load module) for each step, and the resources re- 
quired for each step. These specifications would normally be prepared once 
for each type of job (e.g., FORTRAN compile, link, and execute) and saved 
on a disc file for subsequent retrieval. Saving the JCL in card image form 
requires reprocessing each time it is retrieved. To avoid this reprocessing, 
DX980 saves the JCL ina binary form by passing the card images through a 
program that produces a savable binary image. Thereafter, the binary 
images can be processed on subsequent retrievals. The utility program that 
translates the card images to binary is called the JCL translator. 


Expanded JCL is not recognizable to the DX980 operating system, but only to 
the JCL translator program that runs as a job under DX980. Expanded JCL 
is the input to the JCL translator. 


2.3.2 ABBREVIATED JCL 


Abbreviated JCL, the mechanism for job submittal to DX980, is ''cookbook"' 
oriented. It allows a user to runa FORTRAN program by directing the op- 
erating system to "RUN FORTRAN". The user does not have to specify the 
detailed job step structure and resource assignments required to invoke the 
two passes of the compiler, to activate the link editor and finally to execute 
the program itself. This form must have a binary image of the expanded 
JCL saved ona disc file under the appropriate name, i.e., 'FORTRAN", 
That is, the expanded JCL must be prepared and processed for the FORTRAN 
example. However, this can be done by a systems programmer, leaving the 
applications programmer to debug his FORTRAN program without having to 
learn all ideosyncrasies of an expanded JCL. 


In addition to invoking an existing JCL sequence (a sequence of expanded JCL 
statements) by name only, abbreviated JCL allows modification of one or 
more JCL specifications at runtime. For example, the original JCL speci- 
fications might have assumed that a FORTRAN source program would be sup- 
plied on cards when in fact the source for a particular program is stored on 
a disc file. To satisfy this requirement, the user can specify at the time the 


expanded JCL is prepared that any given JCL parameter is either: 
(1) completely specified and cannot be modified at runtime, 
(2) completely specified but can be modified at runtime, or 
(3) not specified at all and must be supplied at runtime. 


With this facility, the user of a JCL sequence can decide that the original 
specifications or defaults are acceptable and invoke the sequence by name 
only, or he can decide that modifications are required and can specify the 
parameters to be modified. Abbreviated JCL is processed by the DX980 sub- 
systems or by the DX980 operator communications facility via the system 
console, 
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2.3.3 JCL TRANSLATOR 


The JCL transiator is a utility program that runs in user memory (as 
opposed to running in memory that is allocated to the operating system). 
This program translates expanded JCL statements into an internal binary 
representation for later processing. Input to the translator can be supplied 
from any of the standard 980 input devices (card reader, cassette, magnetic 
tape, disc files, etc.). Output from the translator can be stored ona disc 
file for later submission. Since the translator is a utility program, it can 
be invoked as any other user program by using abbreviated JCL form. The 
saved JCL sequence for the translator is stored on the system disc together 
with several other sequences that are supplied with each DX980 installation. 


2.3.4 DX980 SUBSYSTEMS 


In any particular DX980 installation one or more of the subsystems may be 
active for submission of user jobs. For a system with a card reader the 
Batch Processing Subsystem is active and user jobs can be submitted from 
the card reader. For systems with several terminals attached, the Interac- 
tive Terminal Subsystem is normally active to allow jobs to be submitted 
from any of the terminals. In any case, jobs can be submitted from the sys- 
tem console. 


Job submission from each of these sources is consistent with the cookbook 
ICL approach. The TCT, sequence oroduced he tha teanalatan is retrieve 
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from a disc file, modified according to the user's specifications, and sub- 
mitted to the operating system for execution. 


2.4 JOB SUBMITTAL 


Job submittal commands in DX980 are separated into two categories: JOB 
commands and RUN commands. The JOB command is required for a job sub- 
mission and identifies the user and the JCL sequence file to be used for that 
particular job. The RUN command represents abbreviated JCL and invokes 

a particular JCL sequence from the JCL file specified in the JOB command. 
When submitting a job via the system console or the Interactive Terminal 
Subsystem, only one JOB command is required. A job submitted for the 
Batch Processing Subsystem requires a JOB command for each RUN com- 
mand. The identifier, //, must appear as the first two characters ofa 
source line image for both JOB and RUN commands. The system console 
supplies this identifier automatically; however, it must be specifically sup- 
plied when submitting jobs under the Batch Processing Subsystem. The Inter- 
active Terminal Subsystem does not require the double slash identifier. The 
following conventions will be adhered to for all JCL descriptions throughout 
this manual: 


® Brackets [ | enclose optional fields. 


e Operands may be separated by either blank(s) or a single comma 
with or without intervening blanks. Successive commas may be 
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used to indicate a null operand. Both comma (, ) and the symbol, 
%, denote specified field separations. 


e All numerical value parameters must be either decimal (base ten) 
or hexadecimal (base sixteen). A numeric parameter is assumed 
to be base ten unless it is immediately preceded by a ''greater than"! 
symbol (>) to denote a hexadecimal value. 


e The first character of a keyword or operand must be alphabetic and 
the remaining characters may be either alphabetic or numeric char- 
acters intermixed in any order unless specifically noted otherwise. 


e A period terminates a job control command or expanded JCL speci- 
fication. Comments may be written after the period. If no com- 
ments are written, the period is optional. 


@ If the number of operands in a command exceeds the limits of a 
single record, the command operands can be continued in succeeding 
records by terminating each incomplete record with a semi-colon 
(;). Continuation records must begin past the first two spaces of 
the record, since the first two spaces will be ignored by the com- 
puter. If the input is on the system console, the computer auto- 
matically fills these two positions with two periods (..) following a 
record terminated with a semi-colon. Operands may then be entered 
immediately following the two periods. The number of continuation 
records is unlimited. This option can be used with both expanded 
and abbreviated JCL commands. 


e Items shown enclosed in angle brackets (< >) are variables that must 
be supplied by the user when submitting the command to DX980. 


2.4.1 JOB CCMMAND (JOB) 


All jobs submitted to DX980 must be preceded by a JOB command. JOB iden- 
tifies the user submitting a job, the name of the job, and the file where the 
JCL sequence to be executed is located. Two acceptable forms of JOB com- 
mands are as follows: 


//JOB }$<jsname>b<userid> 
//JOB b <jsname>}$ <userid>$ FILE=(<volume>, < fileid>, <filnam>[,< pswd>]) 


In the first example containing no FILE specification, DX980 defaults to the 
System JCS file [FILE=(1, SYSTEM, SJCBFL, AB). ]. 


2.4.1.1 JOB KEYWORD. JOB is the keyword that identifies the remainder 
of a record as a JOB command. JOB must appear in positions three through 
six of the input record. Following the JOB keyword are the command oper- 
ands. These operands are position sensitive and must be separated by one 
or more blanks, or by a single comma with or without intervening blanks. 
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2.4.1.2 <jsname> OPERAND. The nomenclature, <jsname> refers toa 
name that is from one to six characters long. This name remains with the 
job throughout execution and represents the job name. 


2.4.1.3 <userid> OPERAND. ‘The nomenclature<userid>refers to a 
name that is from one to six characters long and that identifies the user to 
the DX980 system. The<userid>operand appears only in the JOB command. 
This operand identifies the disc directory that points to the disc files owned 
by the user. Each directory is itself a disc file that contains information 
about each of the files that belong to it. A utility program, CATLOG, that 
is described later in this manual, creates and destroys the directories. 
When created, each directory is given a unique name, represented by the 
term<fileid>. A file may also be assigned an access restriction at the time 
it is first defined. If access to the file is restricted to only the originator 
(CREATOR) of the file, then the <userids in the JOB command must match 
the < fileid> of the target file before access to the file is granted. 


2.4.1.4 FILE SPECIFICATION. FILE specification identifies the JCL se- 
quence (JCS) file for a particular job. Each DX980 installation is supplied 
with one file of commonly used JCL sequences referred to as the system 

JCS file. In addition, users may create their own JCS files for particular 
applications. In either case the FILE specification directs the system to the 
appropriate file. If the FILE specification is not explicitly provided, the 
FILE specification defaults to the system JCS file [FILE=(1, SYSTEM, 
SJCBFL,AB)]. The following paragraphs explain the parameters of the FILE 
specification. 


<volume> Operand. The nomenclature <volume> represents an integer num- 
ber that specifies the disc unit containing the JCS file. The DX980 system 
disc is always disc number 1, and always contains the system JCS file. Addi- 
tional disc units are labeled 2 through n (n < 20), and can be specified at 
Initial Program Loading (IPL). 


<fileid> Operand. The nomenclature <fileid> refers to a name that is from 
one to six characters long, and that specifies the file directory containing 
the JCS file. For the system JCS file this operand should be specified as 
SYSTEM. For auser JCS file this operand must correspond to the< fileid> 
that was specified when the JCS file was created. 


<filnam> Operand. The nomenclature <filnam> refers to a name that is from 
one to six characters long and that designates the file within <fileid> where 
the JCL sequences are stored. The file name for the system JCS file is 
SICBFL. For auser JCS file this operand must correspond to the <filnam> 
that was specified when the file was created. 


I 
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<pswd> Operand. The nomenclature <pswd> represents a name that is from 
one to four characters long and that is required only if the JCS file was desig- 
nated for password protection when it was created. Normally JCS files 

would not be protected from reading (the process of acquiring a JCL sequence 
from a file is a read operation) and this operand is not required. However, 
if the file is password protected from reading, this operand is required and 
must match the password that was specified when the file was created. The 
file, SJCBFL, is not password protected from reading. 


2.4.1.5 JOB EXAMPLES. The following examples illustrate the use of 
the JOB command. 


(1) //TOB NAME1 SYSTEM The job with job name 'NAME1'"! 
will be run under the userid "SYS- 
TEM". Defaults on the three re- 
maining JOB parameters are "1"! 
for <volume>, "SYSTEM"! for 
<fileid> and "'SJCBFL" (acronym 
for System JCL File) for<filnam>. 


(2) //JOB NAME2 USERO1 The job with job name 'NAME2" 
will run under the userid 'USEROL'' 
The three default parameters are 
the same as example one. 


(3) //JOB NAME3 SYSTEM FILE=(1, USERO1, JCLFIL) 


The job with job name 'NAME3" 
will be run under the userid 
"SYSTEM". The JCL sequence 
will be retrieved from the file 
name "JCLFIL" under< fileid> 
"USERO1'' on disc number one. 
JCLFIL must have been previously 
created or the job will abort with 
a JCL error. 


2.4.2 RUN COMMAND (RUN) 


The RUN command is the control statement interpreted by DX980 subsystems 
and operator communications as a request to submit a job. This command 
and its operands comprise the abbreviated JCL for DX980 and must be sup- 
plied for each job submission. Only one RUN command is permitted within 

a JOB command. Thus each job submitted to DX980 requires a single JOB 
command followed immediately by a RUN command. 


The format of the RUN command is as follows: 


//RUN#<jcsnam>$[< ky =p, >B<k5=p,>- . -<k =p >] 
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2.4.2.1 RUN KEYWORD. The RUN keyword, following the command de- 
limiter {(//), identifies the remainder of the record as a RUN command. 
This format is consistent whether the job is submitted via the Batch Pro- 
cessing Subsystem (BPS), or the operators console. If submitted under the 
Interactive Terminal Subsystem (ITS), the command delimiter does not pre- 
cede the RUN keyword. 


2.4.2.2 <jcsnam>OPERAND. The nomenclature< jcsnam>refers toa 
name that is from one to six characters long and that represents a JCL se- 
quence within the JCS file specified in the JOB command. This operand 
allows several JCL sequences to be stored in the same file with a unique 
name for each sequence. This operand is an extension of the FILE speci- 
fication on the JOB command in that the FILE specification directs the sys- 
tem to the appropriate JCS file and <jcsnam> specifies the JCL sequence to 


be invoked. 


2.4.2.3 USER DEFINED KEYWORDS (k, kp, ..., k,). The user defined 
keywords in the RUN command permit modification of JCL parameters at 
runtime. Changing parameters is frequently required when the default speci- 
fications for one or more resource assignments do not match the require- 
ments for a particular job submission. When expanded JCL is prepared for 
input to the translator, the individual parameter specifications may include 
a user defined keyword which allows those parameters to be overridden. 
Selection of the keywords is at the discretion of the programmer preparing 
the JCL sequence. For example, a user defined keyword for specifying the 
master data file input to a payroll program might be specified as '"MASTFL!" 
in one environment and as ''PAYFIL'' in another. 


All user defined keywords supplied in the RUN command must match the 
corresponding keywords in the expanded JCL. Unused keywords in the ex- 
panded JCL assume their default values. If no default was specified, a JCL 
error results. 


2.4.2.4 PARAMETERS FOR USER DEFINED KEYWORDS. The nomen- 
clature ''p] p2 ... py'' represents either numeric or mnemonic values to be 
substituted into the JCL sequence <jcsnam> that the system retrieves from 
the <filnam> file. The size of the numeric values must fit within the limits 
of the parameter being replaced. For example, if priority were the variable 


being specified, ''p'' must be between 1 and 31. 


2.4.2.5 RUN EXAMPLES. The following examples illustrate the use of the 
RUN command to invoke the JCL translator. A list of the expanded JCL for 
the translator is included in Appendix B of this manual. 


(1) //RUN JCL "TCL" is the <jcsnam> for the 
JCL translator. This sequence is 
stored in 'SJCBFL" under the 
fileid "SYSTEM". This example 


2-7 Digital Systems Division 


° 
VO 943005-9701 


invokes the JCL translator with 
standard default assignments for 
input and output. The standard 
defaults are listed in the JCLTRN 
JCS in Appendix B of this manual. 


(2) //RUN JCL DSRC=CR2, DERR=LPI1,DLST=LPI1 


Run the JCL translator with over- 
ride parameters 'LP1"' (line 
printer number 1) for DERR (er- 
ror messages) and for DLST 
(JCL listing), and with 'CR2"'! 
(card reader number 2) for 

DSRC (JCL source device). 


(3) //RUN JCL OBJ=(USEROI, JCL, RLK) 


Run the JCL translator with de- 
fault parameters for DSRC, DERR 
DERR and DLST; use override 
parameters ''JCL" for the file 
name under fileid ''USEROL" 

with password ''RLK"'. 


2.5 EXPANDED JCL SPECIFICATION 


The following sections describe the format of JCL translator input. A de- 
scription of the output is not appropriate at this point since it is only acces- 
sible to the DX980 subsystems. However, this information is available in 
Section V within the description of the Start Job supervisor call. 


2.5.1 JCL TRANSLATOR INPUT FORMAT 


All input commands to the JCL Translator require a single / (slash) as the 
first character of the source line image. This is followed by a legal com- 


mand (1 of 6) and any applicable keywords. The six commands are: 
CREATE 
REPLACE 
DELETE 
EXEC 
ASSIGN 
END 
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These commands are explained later in this section. There are three accept- 
able formats for these input commands as follows: 


(1) /COMMAND <keyword>... 
(2) /COMMAND- <keyword>=<value>... 
(3) /COMMAND- <keyword>:=<label>... 


2.5.1.1 FORM ONE. The nomenclature <keyword> represents a binary 
condition that is either ‘true''or "false''. There is always one <keyword> 
for the "true'' condition and another for the "false''’ condition. If both 
<keyword>s are specified for the same operand, the dual assignment will be 
detected as a JCL error. 


2.5.1.2 FORM TWO. The notation <keyword>=<value> assigns a value or 
values to a particular <keyword> or <keyword>s respectively. This form 
may be used in either of the two formats as follows: 


a) <k)> =<P)>1<K,>=<P,>) os 7<k> =<Pe 


b) <k>=(<p) >: <P5>» eee J <P>) 


If the second format is used, all parameters are positional and must be sup- 
plied or replaced with successive commas. 


2.5.1.3 FORM THREE. The notation <keyword>:=<label>, permits the 
user to specify a label which becomes a<keyword> in the RUN command for 
operand replacement at job submittal. The translator will accept a combina- 
tion of form three and either form one or form two for the same operand. 
This combination creates an operand that may be submitted with an appro- 
priate default value if not overridden in the RUN command. Form three must 
be used if the operand is to be supplied when the job is submitted. 


2.5.1.4 DEFAULTS. Each operand in a given command must either be 
supplied in one of the three forms or have an acceptable default value of 
zero. When operands are required but not supplied, DX980 inserts zero for 
the operands. If the default zero is not acceptable, omission of an operand 
results ina JCLerror. Table 2-1 lists the JCL operand defaults. 
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EXEC PROT /PRIV PROT 
ASSIGN EXCLUSIVE 


EXCLUSIVE/SHARE 


RELEASE/ PASS RELEASE 
OLD/NEW/REPLACE 
SAVE/DELETE 


PASSWORD 


2.5.2 CONTROL COMMANDS 


The first input record to the JCL translator must be a CREATE, REPLACE 
or DELETE command. The formats for this command are as follows: 


/CREATE <jcsnam> 
/REPLACE <jcsnam> 
/DELETE <jcsnam> 


The CREATE command adds a new JCL sequence, the REPLACE command 
replaces an existing sequence, and the DELETE command deletes an existing 
sequence in the JCS file. If CREATE or REPLACE is specified, additional 
input is expected after the command to define a new sequence. If DELETE 
is specified, no additional input is expected other than a /END command to 
terminate the operation. The name of the JCL sequence is <jcsnam> Sub- 
sequent RUN commands to invoke the sequence must specify the same 
<jcsnam>. 


2.5.3 EXECUTE COMMAND 


Each job step defined for a sequence must begin with an Execute (EXEC) 
command. This command contains information to set up the execution en- 
vironment for the program to be run. Input and output information is not in- 
cluded. If there are multiple steps in a sequence, each step must begin with 
an Execute command. The Execute command supplies the following informa- 
tion about a program: 


e object program 
e memory usage 


e priority 
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® time limit 
e execution mode 
The format of the execute command is as follows: 
/EXEC operands 
The Execute operands may appear in any order following the command. The 


following paragraphs explain each operand. 


2.5.3.1 OBJECT PROGRAM SPECIFICATION. The object program speci- 
fication operand supplies the location of the disc file that contains a binary 
memory image of the object program. The object file to be used as input 
must have been previously created by DXOLE. There are four parameters 
required to access a unique object file. The format of these parameters is 
as follows: 


OBJV=<volume> 
OBJN=<userid> 

OBJF =<filnam> 

OBJP=<pswd> 


An optional form can also be used: 


OBJ=(<volume>, <userid>, <filnam>, <pswd>) 


The OBJ parameters can be interpreted in the same manner as the corres- 
ponding parameters in the JOB command. For example, <volume> is an 
integer number from 1 to n that indicates a particular disc drive unit where 
the object file is located. The other parameters are user assigned. The 
<pswd> parameter is required only when the file is password protected for 
the execute attribute. 


2.5.3.2 MEMORY USAGE SPECIFICATION. The memory usage specifica- 
tion refers to the runtime memory allocation for the object program, file / 
device buffers, and user control information. All memory specifications are 
represented in units of memory words (16 bits per word). Three parameters 
are required to completely specify user memory and are input in the follow- 
ing format: 

MEMT=<stksiz> 

MEMU=<jarea> 

MEMJ=<jearea> 


or in the optional form: 


MEMa=(<stksiz>, <jarea>, <jearea>) 
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The parameter <stksiz> specifies the stack size supplied for the initial user 
task created by DX980 when the job is started. This memory area is used 
for temporary storage whenever a Supervisor Call (SVC) is executed by the 
user program (the DX980 SVCs are discussed in Section V.) Since the 
DX980 SVCs are generally reentrant, execution of an SVC requires a work 
area for storage of local variables. If several reentrant modules are exe- 
cuted to perform the SVC function, the work areas for each module must be 
stacked as the SVC is processed. This work area stack must be supplied 
within the user program's job extension area. 


Although each DX980 SVC requires a different amount of memory for the 
work area stack, the I/O SVCs require the largest amount. Thus, a<stksiz> 
specification that satisifes 1/O SVCs will also satisfy the remaining SVCs. 
The two types of I/O SVCs are I/O calls either to peripheral devices or to 
disc. I/O to peripheral devices requires approximately 125 words of 
<stksiz>, whereas disc file I/O calls can require up to 300 words. There- 
fore, specify 125 words if there are no disc files assigned and 300 words 
otherwise. Either size will be sufficient to handle all other SVCs. This 
<stksiz> specification applies only to the first task. Other tasks within the 
job define their own stack allocation. 


The parameter <jarea> defines the program job area for storage of the user's 
object program plus any work space required by that program. The size of 
an object program can be determined from the output of the DX980 Linkage 
Editor DXOLE. If the program was subjected to a pre-planned overlay when 
input to the Linkage Editor, <jarea> must be large enough to accommodate 
the longest or largest overlay segment plus three words per phase (including 
the root phase) for overlay directory. This information is also available 
from the Linkage Editor. | 


If the user requires a program with a dynamic work area that can be speci- 
fied at runtime, <jarea> must specify sufficient memory for both the object 
program and the work space. The user program can then determine avail- 
able memory for the run through Get Memory supervisor calls within the 
program logic. This concept is particularly useful to allow the amount of 


suntime rather than when the program 


is compiled. 


The parameter <jearea> defines the user program job extension area and 
refers to that portion of the user's memory region used for file or device 
buffers and control information. This area, though not directly accessible 
from a user program, must be supplied for execution of the program. 


The determination of the <jearea> size is much more difficult thah that of 
<jarea> because the size of <jearea>is dependent on the logic of the user 
program and will vary throughout the course of program executions. The 
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following algorithm, though not exact, provides a guideline for the specifica- 
tion of <jearea>: 


NF NB | 
<jearea>= max (BS, + 1) + 17*NT + 7*NL + 55+ 11 
J i 
ia je 4 | 


where 
NF = Number of files assigned to the job step 


NB = Number of buffers requested for each file 
BS = Block size 


NT = Number of co-resident program tasks 


NL = Number of logical units (LUNs) assigned concurrently to the job step 


SS = Dynamic TCB stack requirements 


Since the terms inside the braces vary as a function of the number of files or 
devices that are open and of the number of concurrent tasks that exist, the 
user must determine the maximum value of the expression to specify <jearea> 
size. 


The first term, disc file blocksize, is the sum of all blocking buffers that 
coexist at any instant in time plus one word of overhead for each block. 
Since memory is allocated to blocking buffers oniy when a file is open, this 
term varies according to the disc file activity in the user program. If mul- 
tiple buffers are specified for a single disc file, each buffer must be ac- 
counted for. 


The second term encompasses the memory requirements for task control 
blocks. Each task control block requires 17 words. Therefore, this term 
can be determined by muitipiying the number of tasks that exist at any instant 
intime by 17. The operating system creates one task for the user job when 
the job is started. Therefore, there is always at least one task control block 
in the job extension area. Any additional tasks are directly created by the 
program using the Create Task supervisor call (Section V), or indirectly 
created by the program using an Initiate 1/O supervisor call (Section IIL). 


The third term provides space for Logical Device Tables (LDT). There is 
one LDT for every file or device assigned to the job. Thus, this term can be 
determined as the number of logical units assigned multiplied by 7 (the size 
of each LDT). 


The fourth term, TCB stacksize, is a companion to the <stksiz> parameter. 
The memory specified for <stksiz> is allocated from the job extension area 
when the initial user task is created. If the user creates additional tasks 
within the program, the <stksiz> specification for the additional tasks must 
be supplied with the create task SVC. As each task is created, the memory 
required by the accompanying <stksiz>is also allocated from the job exten- 
sion area. Thus the TCB stacksize term must provide sufficient memory to 
accommodate all concurrent tasks. 
a 
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The fifth term, a constant 11, is due to overhead required by the DX980 
memory manager for control information, plus one extra LUN assignment 
that is made by the operating system for every user program. 


Examples: 

(1) MEM=(125, 2000, 152) Allocate memory for a program 
with a single task and two LUN 
assignments to non-disc peri- 
pherals. The interpretation of 
this specification is: 

(1) <stksiz> of 125 words pro- 
vides a stack for I/O to non- 
disc peripherals 

(2) <jarea> of 2000 words for the 
object program. This num- 
ber is output from DXOLE. 

(3) <jearea>of 152 words accounts 
for one co-resident program 
task (17 words, two LUNs 
(14 words), 125 words of TCB 
stacksize, and 11 words of 
overhead. 

(2) MEM=(300, 4000, 917) Allocate memory for a program 


with two tasks, one system cre- 
ated task and one user created 
task, and two LUN assignments 
to disc files, each with a physical 
record length of 128 words. The 
interpretation of this specification 
is: 


(1) <stksiz> of 300 words for file 
I/O 

(2) <jarea> of 4000 words a 
specified on the DXOLE load 
map 

(3) <jearea>of 917 words accounts 
for two co-resident program 
tasks (34 words), two LUNs 
(14 words), two physical rec- 
ord buffers (258 words), 600 
words of TCB stacksize (as- 
suming that the user created 
task was also created with a 
<stksiz> specification of 300 
words for disc I/O), and 1l 
words overhead. 
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2.5.3.3 PRIORITY SPECIFICATION, Priority specifies the priority of the 
job step at execution, and the number of unique priority levels needed within 
the step. This information is input to the DX980 computations which provide 
resources to the resultant program during job submission and program exe- 
cution. When the job is submitted, this job step contends for system re- 
sources such as memory and peripherals along with all other job steps wait- 
ing to be initiated. When the job is executed, scheduling of the CPU is also 
determined oy priority. The required parameters and appropriate mnemonic 


lad a1 
presentati ons are aS Iollows: 


PRT L=<nprty> 
PRTS=<jsprty> 

or in the optional form: 
PRT Y=(<nprty>, <jsprty>) 


The nomenclature <nprty> represents the number of task priority levels and 
is greater than one only if the program uses the multi-tasking feature of 
DX980. This number corresponds to the maximum number of separate task 
priority levels (not the number of separate tasks) that may be created within 
the user program. Several tasks may share a common priority level. 


The notation <isprty> represents the job step priority, which is the priority 
ssigned to the job step for eeheduline purposes and to the initial task cre- 
ee by the operating system. The limits on <jsprty> are 1 to 31 where 1! is 
the highest and 31 the lowest priority permissible to a user program. More 
than one job may execute concurrently while sharing a common priority 


level. 


Tt ee aed step ee Mw wee 3 > = Sa = poe P = J GAean 


— as eee 

1 <<nprty> < 3l 

1 <<jsprty> < 31 

i S<nprty s+ <jsprty>< 32 
The limits on each parameter are due to the priority limits in DX980. The 
combined limit is due to the method of creating one task from another in 
DX980. If the user program creates additional tasks, the priority of each 
created task is specified relative to the job step priority (0, 1, 2, etc.), 
where the relative numbers are always positive. Thus, a task cannot be 


created from a user program with a higher priority than the job step priority. 
However, tasks can be created with priority equal to or lower than job priority. 
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_If any task is created with a priority lower than 3l, the creation will be rec- 
ognized as a fatal error and the job will be aborted. This criteria produces 
the combined <nprty> and <jsprty> limit. 


Examples: 

PRI Ys (1,35) This job step contains only one 
task priority level. Both the job 
step and the task(s) created for 
program execution are assigned 
priority 15. 

PRTY=(2,1) There are two task priority levels 


-in this job step, levels 1 and 2. 
The job step is assigned priority 
1. 


2.5.3.4 TIME LIMIT SPECIFICATION. Time limit specifies the maximum 
amount of time for execution to be allotted to a job step. The time monitored 
represents actual time that the program has control of the CPU (rather than 
wall-clock time). If the program has not terminated normally when the time 
limit passes, the operating system abnormally terminates the program. 

Time parameter format is as follows: 


TIME= time limit in seconds 


To instruct the translator and operating system to run a job with an infinite 
time limit, set the time limit to a minus one: TIME=-1. This input is in- 
terpreted as a directive to ignore timeout checking completely. 


2.5.3.5 EXECUTION MODE SPECIFICATION. Privileged or protected re- 
fers to the mode of the program during execution. Normally user programs 
run in the protected mode so that they are prevented from damaging the op- 
erating system. System programs always run in the privileged mode, allow- 
ing them to move freely within available memory. The format of this param- 
eter is as follows: 


PRIV 
PROT 


2.5.3.6 EXECUTE COMMAND EXAMPLE, The following input sample 
illustrates the use of the EXEC command: 


/EXEC OBJ=(1,SYSTEM, ASMBLR), MEM=(300, 5000, 1000), PRTY=(1, 15); 
/TIME=-1 MEM:=MEM, PRTY:=PRI, TIME:=TIM 
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2.5.4 ASSIGNMENT COMMAND 


Each job step must define the logical units for 1/O operations. I/O assign- 
ments are not carried forward from one job step to another. Therefore, an 
assignment command must be included for each Logical Unit Number (LUN) 
referenced during execution of each job step, except when using the Execution 
Time Allocate SVC (see Section V). An assignment command has a slash (/) 
in column 1 and the keyword "ASSIGN" in columns 2-7. Following ASSIGN, 


execute command. For convenience, however, the logical unit number and 
device name operands may be specified positionally, logical unit number first 
and device name second, or with the< keyword>=<value> form. As with all 
operands, the< keyword>:=<label> form can provide override capability when 
the job is submitted. 


Each assignment command in each job step must have the following minimal 


information: 
e LUN 
6 device name 


e device sharability 
e device disposition 


If device name specifies a random access device (moving head disc), 
then the following information must be supplied also: 


e file creation 

e file identification 

2 file disposition 

® number of file buffers (key indexed files only) 


If file creation is specified as 'NEW", then the following must also be speci-. 
fied: 


e file type 

® file integrity 

e file allocation 

e key length (key indexed files only) 

e logical record length (relative record files only) 


Each operand, together with the operand limits and default value, if any, is 
described in the following sections. 


a 
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2.5.4.1 LUN OPERAND. LUNs provide a consistent method of communi- 
cation between a user program and the DX9801/O system. All I/O requests 
from a user program must be accompanied by a LUN. Each LUN must be 
coupled to a physical device or file through the assignment command. This 
feature allows I/O requests in a program to be device independent, and de- 
fers the actual device assignments until the program is submitted for execu- 
tion. The LUN operand can take either of the following forms: 


LUNO= <lun> 
or 
/ASSIGN <lun> 


The notation<lun>is a decimal number in the range of 0 to 250 (LUNs from 
251] through 255 are reserved for operating system use), and must be unique 
within a job step. Duplicate assignments of the same LUN within a job step 
will be recognized as an error. However, the same LUN can be used by 
more than one job, since each assignment applies only to a specific job. 


2.5.4.2 DEVICE NAME. Device names refer to the mnemonics that rep- 
resent the physical devices attached to the computer. The translator accepts 
any of the permissible device mnemonics that could exist for a DX980 instal- 
lation. If an assigned device does not actually exist, one of the subsystems 
detects the error when the job is submitted and the job is aborted. The 
DEVICE NAME operand can take the form of either of the following forms: 


DEVICE=<devnam> 
or 
/ASSIGN <lun> <devnam> 
The notation <devnam> represents a user supplied mnemonic that must be 


selected from the list in table 2-2. 


Table 2-2. Suggested Device Names 


: Device Index : si 
Mnemonic Device Description 


Range 


DISC1-DISCn Disc (Moving head or DS330) 1 through 
n < 20 n, n<20 | 


KEY1-KEYn Teleprinter keyboard (ASR/KSR 33, 730, 


733,735) 1 through n 
CRT1-CRIn Video display 1 through n 


SC System console data terminal (Tele- 
printer keyboard or video display) 
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Table 2-2. Suggested Device Names (Continued) 


; Device Index : aa 
Mnemonic Device Description 
Range . 


MT1-MtTn 31 - 40 Magnetic tape 1 through n 


LP1-LPn Line printer 1 through n 


CR1-CRn 51 - 60 Card reader 1 through n 
| 
| 


PTR1-PTRn 61 - 70 Paper tape reader 1 through n 

PiPl=PiPna 71 - 80 Paper tape punch 1 through n 

DM1-DMn 81 - 90 Data module interface devices 1 
through n 

ADDA1-ADDAn 91 - 100 Analog -to-digital/digital-to-analog con- 


verter 1 through n 


SYSOUT 


| 
CS1?: CSi2. 4644 £O1 =: 410 Cassette 1 on teleprinter 1 through 
CSnl, CSn2 cassette 2 on teleprinter n 
DUMMY 255 | Dummy device - responds with an im- 
| | mediate end-of-file on input and with 
| no-op on output 
SYSIN - System input spooler 


System output spooler 


TERMIO Interactive terminal log on device 


2.5.4.3 DEVICE SHARABILITY. A device or file can be designated as 
either shared or exclusive. These attributes are specified by the binary rep- 
resentation of the keywords "SHARE" or "EXCLUSIVE". The default value is 
exclusive. If a device or file is exclusively assigned to one job, then any 
other job that is submitted with an assignment to that device or file, either 
shared or exclusive, will not be started until the first job releases it. Ifa 
device or file is selected as shared by all assigning programs, then all pro- 
grams may run concurrently. 


2.5.4.4 DEVICE DISPOSITION. The device assignment may be kept or re- 
leased when the current job step is completed. This choice is specified by 
the binary keywords 'RELEASE" or "PASS". The default value is release. 


Assignment passing in DX980 is extremely useful for multi-step jobs that re- 
quire the same file or device in more than one step. Further, passing a de- 
vice or linked sequential file will cause the physical position to be maintained 
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between job steps (key indexed and relative record files do not hold position 
between steps). Even though passed, a device must be assigned to a LUN 
for the next job step. 


The passing of only a portion of the required resources for a job string can 
cause a resource deadlock. However, DX980 guards against any deadlock by 
cancelling jobs that have passed resources from a previous job step and that 
are also requiring unavailable resources. Thus, to prevent a job cancella- 
tion caused by the running job environment, the user should specify that all 
resources are passed from job step to job step. 


2.5.4.5 FILE CREATION. A file may be either old, new, or a replace- 
ment. These attributes are specified by the binary representation of the key- 
words 'OLD", "NEW" and ''REPLACE" which are defined as follows: 


@ OLD: File already exists (default value). 
® NEW: Create a file. Error if file already exists. 
@ REPLACE: Replace file if it is there; create a file if it is not there. 


2.5.4.6 FILE IDENTIFICATION. A file is accessed via a file directory 
(or dictionary) and file name, and can be protected by a password. The 
directory, name and password can be specified with either of the following 
formats: 


FILDIR=<fileid> 

FILNAME=<filnam> 

PASSWORD=<pswd> 
or 


FILE=(<fileid>, <filnam>, [<pswd>]) 


The <fileid> and <filnam> parameters are identical to the <fileid> and 
<filnam> parameters in the JOB command. A special case of the <fileid> 
parameter is provided for temporary files. The user can specify a file for 
use only during a job string, by entering a <fileid> of 'TEMP". This file is 
never entered into a User File Directory, but is totally unique to the job 
string using it. The file creation parameter should be NEW for the first ref- 
erence to a temporary file, and OLD for subsequent references. All other 
parameters are specified as usual. The file is deleted at the end of the job 
string unless deletion is specifically called for at the end of a job step by the 
DELETE directive. 


The notation <pswd> denotes a user supplied password that is used in con- 
junction with file integrity to control file access as described under ''File 
Integrity'' in this section. If this parameter is specified when a file is cre- 
ated, it will be required to access the file. Otherwise, <pswd> is ignored. 


OO 


2-20 Digital Systems Division 


° 
WO 94305-9701 


2.5.4.7 FILE DISPOSITION. The user can choose to either delete or save 
a file after a job step. These two alternatives are specified by the binary 
keywords: 


SAVE 
DELETE 


The default value is SAVE. If the device disposition parameter was "PASS", 
specifying ''DELETE" produces an error condition that is detected by the 
operating system. 


2.5.4.8 FILE BUFFERS. Linked sequential files always require one buf- 
fer. Relative record files require no buffers if the logical record length 
equals the physical record length (unblocked), and require one buffer if the 
logical record length is less than the physical record length (blocked). These 
specifications are fixed and are unaffected by user input in JCL. However, 
file management supports a variable number of buffers for key indexed files. 
For a sequential access of the data records within a key indexed file, only 
one buffer is required. For keyed access, a minimum of two buffers is re- 
quired: one for key records and one for data records. Using more than two 
buffers for these files reduces the amount of disc I/O required and increases 
program speed. Therefore, the number of buffers assigned to a key indexed 
file is controlled by the user through the Buffers specification. The format 
for this specification is: 


BUFFERS=<nbufs> 


2.5.4.9 FILE TYPES. A file may be either linked sequential, relative 
record, or indexed. These attributes are specified by the binary representa- 
tion of the keywords ''LINKSEQ", "RELREC", and "INDEXED". There is no 
default for file type, so it must always be specified. See Section IV for a de- 
scription of the three file types. 


2.5.4.10 FILE INTEGRITY. Files can be accessed under DX980 for one 
of four functions: read, write, delete, or execute. Data management pur- 
poses frequently require unlimited access to a file for one or more of these 
function, but only limited access for others. Therefore, DX980 provides an 
integrity mechanism for each of these functions. For example, DX980 can 
be instructed to allow any user access to a file for reading but require a 
password for access during writing or deleting. The format for supplying 
integrity codes (only appropriate for newly created files) is either: | 


READCODE=<integ> 
WRIT CODE=<integ> 


ec SS SSS 
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DELCODE=<integ> 
EXECODE=<integ> 
or 
ACCESS= « integ>, <integ>, <integ>, <integ>) 


The notation <integ> represents the integrity code supplied for each function. 
Select the code from the list of values in table 2-3. 


Table 2-3. File Integrity Codes 


Access Granted To 


All users for the specified function. 


User with password only (those users 
that specify a <pswd> parameter cor- 
responding to the <pswd> parameter 

of the file). 


Creator of the file only (the users that 
specify a <pswd> parameter correspon- 
ding to the <pswd> parameter of the file 
and whose <userid> in the JOB command 
matches the <fileid> of the file). 


No one (no access allowed for the speci- 
fied function). 


An "ANY" code specifies unlimited access, and allows a user to access the 
file for any specified function for which he knows the appropriate <fileid> 
and <filnam>. In this case the <pswd> parameter is not required for file 
specification. 


A "PSWD"' code specifies that access for the associated function is possible 
only if the proper <pswd> parameter is supplied in file specification. When 
a file is created with ''PSWD"' specified for a function, a<pswd> parameter 
must also be supplied during file specification. Integrity code violations are 
detected when the accessing program is running rather than when it is sub- 
mitted. For each I/O request DX980 verifies that the I/O opcode is valid for 
the integrity code that was established when the file was created. 


A "CREAT" code specifies that the <pswd> parameter must match the <pswd> 
parameter of the file and that the <userid> parameter in the JOB command 
must match the <fileid> parameter in the file specification operand for a user 
to gain access for the associated function. 
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A "NONE" code specifies that access is prohibited for the associated function. 
Normally, the only function that has ''NONE" specified for an integrity code 

is "EXECODE"; however, 'DELCODE" may also be specified as "NONE". 
The JCL translator ensures that "NONE" is not specified for READCODE or 


WRITCODE, and flags such a specification as a JOLerror. A 'NONE'' code 
is automatically specified for EXECODE in the case of linked sequential and 
key indexed files since those file types are not compatible with the program 
loader in DX980. 


2.5.4.11 FILE ALLOCATION. File allocation refers to the allocation of 
file space ona disc. This operand is pertinent only for files being newly 
created (NEW or REPLACE). Under DX980 the user must specify the initial 
and maximum space allocation, plus the physical record size of the file that 
will occupy the space. The user can also indicate to DX980 where the file is 
located on the disc. The format for supplying this information is one of the 
following: 


INITIA L=<itrks> 

LOCN=<trknum> 

PRECL=<prwrds > 

MAXTRACK=< mtrks> 
or 


ALLOCATE=(<itrks>,<trknum>,<prwrds>,< mtrks>) 


The nomenclature <itrks> represents the initial number of disc tracks that 
are allocated to the file when the file is created. If the file type operand is 
"RELREC", the initial allocation is forced to match the maximum allocation 
because relative record files must be stored contiguously on the disc and 
cannot grow. For the other file types, however, the file organizations are 
noncontiguous and allow the file to grow beyond its initial allocation. The 
default value for <itrks>is l. 


The nomenclature <trknum> represents the disc track where DX980 will start 
searching for space to allocate to the file. The track allocation mechanism 
in DX980 starts searching for the number of tracks specified in <itrks> at 
track number <trknum>and continues the search until it finds sufficient con- 
tiguous space to satisfy the request. Normally the search starts at track 0 
and continues across the entire disc if necessary. Although disc tracks on a 
moving head disc are not physically constructed in ascending order across 
the disc, they are considered as such for the specification of <trknum>. In 
general, specifying a nonzero <trknum> may be used to position the new file 
close to another file. 
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This specification is useful only to reduce head movement on a moving head 
disc drive when both files are accessed by a single program. This arrange- 
ment can result in a significant throughput increase for I/O bound programs 
that access more than one disc file. _ 


The notation <prwrds> designates the number of words in each physical rec- 
ord. Each physical record stored on the disc is preceded by a record 
header. The moving head disc has a header at the beginning of each disc 
sector regardless of physical record length and individual track formatting 

is unnecessary. The DS330 disc system requires track formatting that in- 
volves writing record headers at the beginning of each physical record across 
the entire track. Various track formats are shown in table 2-4 for the DS330 
disc type. Maximum values for <prwrds> are shown in table 2-5. Formatting 
time for DS330 is 80 ms/track and occurs when the tracks are allocated to 
the file, either initially or when expanding to another track. Since the disc 
systems supported by DX980 store data in blocks of 32 words, it is necessary 
to constrain <prwrds> to multiples of 32 words. Furthermore, since physical 
record length is analogous to blocking buffer size, memory allocation for the 
job extension area (<jearea>in the JOB command) must comprehend the 
physical record length of each file assigned to a program. 


The parameter <mtrks> defines the maximum number of tracks that are allo- 
cated to a file that can grow, and in particular, to linked sequential and key 
indexed files. The initial allocation (<itrks>) for these file types is made 
when the file is created. When an operation tries to add data after the ini- 
tial allocation is used up, the file grows one track at a time until either the 
additions are completed or the number of tracks specified by <mtrks> is 
reached. Inthe latter case, the offending program terminates abnormally 
after file management allocates one extra track to perform thewrite opera- 
tion in progress. 


Examples: 


a (1) ALLOCATE=s(1, 0, 32, 1) Allocate 1 initial track, starting 
the search at track 0. Format 
each physical record into 32 
words and allocate no more than 
1 track regardless of program 
activity. 


| (2) ALLOCATE=(5, 100, 512,10) Allocate 5 initial tracks, starting 
the search at track 100. Format 
each physical record into 512 
words and allow the file to grow 
to a maximum of 10 tracks. 
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Table 2-4. DS330 Disc Formatting 
Records/Track] Sectors/Record | Words/Record Useful Efficiency 
<prwrd> Words/Track 
88 32 | 41.90 


2816 
4224 62. 86 


— 


4640 


22 4 224 4928 13233 
17 5 288 4896 72. 86 
14 6 384 5376 80. 00 
12 7 448 5376 80. 00 
ll g 512 5632 83. 81 
9 9 576 5184 77.14 
g 10 672 5376 80. 00 
g 11 736 5888 87.62 
| 7 12 800 5600 | 83.33 
6 13 864 5184 | 77,14 
6 14 960 5760 85.71 
5 15 1024 5120 76.19 
| 5 16 1088 5440 80.95 
5 17 - 1152 5760 | 85.71 
4 18 1248 4992 74.29 
4 19 1312 5248 78.10 
4 20 1376 ! 5504 81.90 
4 21 1440 5760 85.71 
4 22 1536 6144 one 
3 23 1600 4800 71.43 
3 24 1664 4992 74.29 
3 25 1728 5184 77.14 
3 26 1824 | 5472 81.43 
3 27 1888 5664 84.29 
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Table 2-4. DS330 Disc Formatting (Continued) 


Records/Track]| Sectors/Record | Words/Record Useful Efficiency 
Words/Track 
3 28 1952 5856 87.14 
3 29 2016 6048 90. 00 
2 30 2112 4224 62.86 
2 31 2176 4352 64. 76 
2 32 2240 4480 66.67 
2 33 2304 4608 68.57 
2 34 2400 4800 71.43 
Z 35 2464 4928 13233 
z 36 2528 5056 75.24 
2 37 2592 5184 77.14 
2 38 2688 5376 80. 00 
2 39 2752 5504 81.°90 
2 40 2816 5632 83. 81 
2 41 2880 5760 85.71 
2 42 2976 5952, Sosa 
2 43 3040 6080 90.48 
2 44 3104 6208 92.38 
1 45 3168 3168 47.14 
1 46 3264 3264 48.57 
i 47 3425 3328 49. 52 
1 48 3392 3392 50.48 
1 49 3456 3456 51.43 
i 50 3520 3520 52.30 
1 51 3616 3616 53.81 
1 52 3680 3680 54.76 
] 53 3744 3744 DOs 1A 
] 54 3808 3808 56.67 
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Table 2-4. DS330 Disc Formatting ( (Continued) 


Records/Track| Sectors/Record | Words/Record Useful Efficiency 
<prwrd> Words /Track 
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Table 2-4. DS330 Disc Formatting (Continued) 


Records/Track| Sectors/Record]| Words/Record Useful Efficiency 
Words/Track 


Table 2-5. Maximum <prwds> Physical Record Lengths 
for Disc Files 


File Type DIABLO Type Disc DS330 Type Disc 


Relative Record 2816 (full track) 6272 (full track) 
Linked Sequential 1408 (half track) 3104 (half track) 


Key Indexed 2816 (full track) 6272 (full track) 


2.5.4.12 KEY LENGTH. The length of keys for new indexed files can be 
specified as in the following format: 


KEY LEN=<klchar> 


The notation <klchar> represents the number of characters in each key for a 
key-indexed file and must be in the range of 1 to 30. The physical record 

length must be able to hold at least 2 keys plus 14 words. Providing a phys- 
ical record length that can hold 10 or more keys increases search efficiency. 
Section IV contains a detailed description of key index file directory formats. 


2.5.4.13 LOGICAL RECORD LENGTH. The logical record length for new, 
relative record files can be specified in the following format: 


LREC L=<Irchar> 


The parameter <Irchar> specifies the logical record length in characters. 

If the relative record file is blocked, then the logical record length must be 
less than or equal to the physical record length. If the file is unblocked, then 
the logical record length must be a multiple of 32, and must be equal to the 
physical record length. LRECL is not appropriate for linked sequential and 
key indexed files since both allow variable length logical records. 
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2.5.4.14 ASSIGNMENT EXAMPLES. The following examples illustrate 
possible uses of the ASSIGN parameters. 


(1) /ASSIGN, 5, CR1, EXCLUSIVE, RELEASE. | 
Assign LUN 5 to the card reader (CR). The card reader is not 
shared with any other user (EXCLUSIVE), and is released at the 
completion of the job step (RELEASE). The period (.) indicates 
the end of the assignment and allows addition of user comments. 
(2) /ASSIGN 5 CR1 EXCLUSIVE RELEASE 
This example is equivalent to example 1. Delimiters between op- 
erands can be either blanks or commas. The period at the end of 
the statement is optional. 


(3) /ASSIGN 13 DISC] SHARE PASS OLD, FILE=(USRNAM, NAME) 
Assign LUN 13 to disc 1. The disc file is shared (SHARE) and 
passed to the next job step (PASS). Since a disc is specified, cer- 
tain file information must be given. The file is old (already exists), 
and can be referenced by name NAME in directory USRNAM. 


(4) /ASSIGN 250 DISC1 SHARE PASS; 
/NEW, RELREC, FILE=(USRNAM, NAME), SAVE; 
/ACCESS=(ANY, CREAT, CREAT, PSWD); 
/ALLOCATE=(1, 38, 64,1), LRECL=40 
A new file was specified so that more information is required in 
addition to that specified in example 3. The new file can be read by 
anyone (ANY), can only be written into or deleted by the creator of 
the file (CREAT, CREAT), and requires a password to execute code 
from the file (PSWD). The file is to have 1 track allocated and 
the search for this track must start at track 38. Each physical 
record is 64 words. Finally, the logical record iength is 40 char- 
acters. 


(5) /ASSIGN 6 SYSOUT 
SYSIN and SYSOUT are system spooling devices. 


(6) /ASSIGN DEVICE=SYSOUT, LUNO=6 
An alternative form of example 5. 


(7) /ASSIGN 6 SYSOUT LUNO:=NEWLUN 
This example has the same effect as examples 5 and 6 except that 
the LUN can be changed for this assignment by specifying 
//RUN ... NEWLUN5s7... when the job is submitted. 


en PS SS 
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2.5.5 JOB CONTINUATION/TERMINATION 


Either another /EXEC card to specify a new job step, or a /END card to 
signify that all job steps for the job have been defined through the JCL Trans- 
lation phase must follow the last assignment of a job step. If the system de- 
tects no errors in processing the sequence of job steps, it writes the infor- 
mation specifying the job in the assigned output file, and locates that file ina 
position specified on either the CREATE or REPLACE control card. 


2.6 FORMAT SUMMARY 


Figure 2-1 summarizes the formatting options and requirements for job sub- 
submittal commands and for extended JCL commands. The format for sub- 
mittal commands appears at the top of the figure. The JOB command format 
is totally generalized; whereas the RUN command is an example that refer- 
ences an existing JCL procedure. The JCS for this existing procedure ap- 
pears in table 2-6. To clarify this example, table 2-7 lists the keynames 

| that appear in table 2-6 that the JCL Translator recognizes, together with the 
default parameters and the default override labels for each keyname. If both 
a default value and an override label appear for the parameter, then it can be 
modified at runtime. If no default value is listed, then the parameter must 
be specified at runtime. If no override label is listed, then the parameter 
cannot be modified at runtime. Following the submittal commands in the fige- 
ure are the extended JCL commands. These commands constitute the input 
to the JCL translator. 


The figure displays, one above the other, all possible options for supplying 
job step information to the JCL translator. Dotted lines illustrate the points 
of convergence for the options. For example at the beginning of the line 
labeled ''New File Specification", the three possible means for specifying file 
types appear as follows: 


/INDEXED, KEYLEN=<klchar <30>, 
RELREC, LRECL=<Irchar>----- / 
LINKSEQ --«anw www ewe ne nnne 


This notation indicates that immediately following the slash (/) one of the 
three forms must be used to designate the file type. The dotted line indicates 
that all of the forms must be immediately followed by a comma before enter- 
ing the next parameter. 
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JOB SUBMITTAL COMMANDS 


JOB //JOB <jsname> <userid> FILE=(<volume>,<fileid>,<filnam>,<pswd>) 
Command FILE=(<volume>,<fileid> ‘<filnam>) 
Bb, 
: > 
RUN 
Command //RUN XJD,DSRC=<devnam>,FSRC=(<fileid>,<filnam>,<pswd>) ,DERR=<devnam>,LIST=<devnam>,DOBJ=D1SC<n>, FOBJ=(<volume>,<fileid>,<filnam>), REP; Sip a | 
/ / / / / ; OLD 
a / — ° 
) / Bw B / # Eps Ge a eB a8 NEW; --——— — 
moa L_<_-_._— ——.—_——— pw mae pb E> fae arse a b | 
EXTENDED JCL COMMANDS (JCL_ TRANSLATOR INPUT) -— - LOBJ=(<itrks>,<trknum>,<prwrds>,<mtrks>) ,MEM=<stksiz><jarea>,<jearea>) | 
| 
és 7 | ‘. 2B | 
Control . /DELETE <jcsnam> Le hs a eee Sa ce es ag rsa en nt ges ee Re Reet aa a ee ee lca hc gmc _| 
Commands /REPLACE <JeShaliz = 


Be <jcsnam> _4 


Execute ae OBUV=<volume>, OBJUN=<userid>,OBJF=<filnam>, OBUP=<pswd>, MEMT=<stksiz>,MEMU=<jarea>,MEMJ= <jearea>,PRTL=<nprty>, PRTS=<jsprty>,TIME=<seconds>,PRIV 
Command OBJ=(<volume>,<userid>,<filnam> ,<pswd>)——— — —— —-»/ MEM=(<stksiz>,<jarea>,<jearea>) ————-»’ PRTY=(<nprty>, <jsprty >) <-|> PROT 


De 


ASSIGN / ASSIGN LUNO=<1un>, DEVICE=<devnam>, EXCLUSIVE ,RELEASE ,FILDIR=<fileid>,FILNAME=<fi ]nam>,PASSWORD=<pswd>, BUFFERS=<nbufs>,REPLACE; —- 
Command <Jun>,<devnam> —-— ——— —e/ SHARE —~9 : ine Se Hie =TEMP , wo” p > d > OLD; 
Z > / > FILE=(<fileid>,<filnam>,<pswd>)_ oe | NEW; a 
i FILE=(<fileid>,<filnam>) ——-— ————-——— a y ! 
Leech me. FILE=(TEMP <filnam>,<pswd>)—— ——————~/ > 
sept Ss pean es a ee ee FILE=(TEMP ,<filnam>)—————-—~—~~---—~ 
: 
New File Ly INDEXED, KEYLEN=<k1 char<30>,READCODE=<integ>,WRITCODE=<integ>,DELCODE=<integ>,EXECODE=<integ>,DELETE, INITIAL=<itrks>,LOCN=<trknum>, PRECL=<prwrds> ,MAXTRACK=<mtrks> 
Specification RELREC “LRECL=<Irchar>—— 7’ ACCESS= (<integ>,<integ>,<integ>,<integ>) -————--——-—--- em’ SAVE ’ ALLOCATE= (<itrks>,<trknum>,<prwrds> <mtrks>) 
LINKS] SS aad y--4 
> | > b> 
End of job /END 
Command 
NOTES > Refer to section 2.4.1.5 for file default on JOB Command. 3 No further input required for non file devices. 
>> The RUN Command given here is an example. Refer to > BUFFERS = 1 for RELREQ and LINKSEQ; > 1 for INDEXED 
table 2-5 for the referenced JCS 
Mae es > <integ> must be one of following: 
> Refer to table 2-6 for defaults specified in the ANY ,PSWD ,CREAT ,NONE. 
referenced JCS 
me To PASS and DELETE cannot be specified simultaneously. 
ee DELETE does not require further input. 
> -]1 designates infinite run time. 
'6 Refer to table 2-6 for standard defaults. 
(B) 129979 Figure 2-1. JCL Translator Formatting 


Summary 
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Table 2-6. Job Control Sequence (JCS) for RUN Command Example 


2# CREATE JCL ,COMMENT, "CREATE Jct PROCEDURE " 
/REPLACE SCL -« CREATE SCL PROCEDURE , 
/EXEC OBJ5(1,SYSTEM/JCLTRN) MEM®(398,7558.1088) PRTVYS(1,15)} 


f _ TIMEsel MEMSsHEM PRTYssPRI : 

‘ASSIGN 1 SC DEVICEssDSRC FILEssFSRC BUFFERS#1! p SOURCE INPUT 
/ASSIGN 2 SC DEVICESa#DERR SHARE: sSERR e ERROR MESSAGE 
/ASSIGN 3 SC _ — DEVICES sDOLST FILEssFLST SHAREs#SLST BUFFERS#1.SOURCE |.ISTING 
ASSIGN 4 DISC} DEVICE:#D0BJ FILEs(SYSTEM,SJCBFL.AB)3 

/ FILErsFOBJ REPLACE: sROBJ ARUFFERS#2 INDEXED: 

/ ACCESS#(ANY,ANY,ANY2ANY) ACCESS28COBJ3 ; 

/ ALLOCATE#(1,8,96,28) ALLOCATES#LOBJ KEYLEN#6 - OBJECT OUT FILE 
“ENO 


Table 2-7. Parameter Keynames and Defaults for JCS Example 


Abbreviated JCL 
Extended JCL Keyname Default Override Label 


(1, SYSTEM, JCLTRN) 


(300, 7600, 800) 


LINKSEQ/RELREC/INDEXED | INDEXED 


) 
OLD/NEW/REPLACE OLD -/NEW/REP 


(ANY, ANY, ANY, ANY) 


ACCESS 
ALLOCATE 
KEYLEN 


| | 
| | 
DEVICE SC DSRC 
FILE a FSRG 
BUFFERS _______ eee. TORT COR SORE ERTS =I TORT 
LUNO | 2 | | 
DEVICE eee ae DERR 
LUNO 3 
DEVICE SC | DEST 
LUNO : ; 4 | | 
DEVICE DISCl DOBJ 
FILE (SYSTEM, SJCBFL, AB FOBJ | 
| 
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SECTION Ii! 
INPUT/OUTPUT STRUCTURE 


3.1 GENERAL 


A user program initiates input/output operations with an Input/Output Super- 
visor Call (I/O SVC). The SVC is an illegal machine instruction that gener- 
ates an internal interrupt. The internal interrupt decoder turns control 
over to the SVC processor. After determining that an I/O SVC has been 
made, the SVC processor gives control to the I/O Management portion of the 
operating system. A set of modules, called Device Service Routines (DSRs), 


handles the primary I/O workload. 


A Device Service Routine contains several logical paths. When an 1/O SVC 
is made, the system follows the initial entry path. The initial entry path be- 
gins the I/O operation and may or may not complete it. I/O device interrupt 
processing follows another path through the DSR. I/O interrupts can occur 
from the I/O Bus or the Direct Memory Access Channel (DMAC) of the com- 
puter. They occur while an I/O operation is in progress or when it is finish- 
ed. Interrupts from the I/O Bus typically occur on a character-by-character 
basis. Interrupts from DMAC devices occur only when the operation is com- 
plete. The system also has a reset path through the DSR to stop uncompleted 
I/O and to initialize the device and DSR. Separate operating system modules, 
working with a disc DSR, control file management for the disc. Section IV of 
this manual describes DX980 file management. 


3.2 I/O SUPERVISOR CALLS 


The I/O SVC is made by attempting to execute one of two illegal machine 
instructions: >C380 or >F800. The programmer usually defines the I/O 
SVC instruction word with a symbolic name using the OPD (Operation Defini- 
tion) assembler directive. To complete the call, the M-register must con- 
tain the address of either a Physical Record Block (PRB) for the C380 in- 
struction, or an argument list for the F800 instruction. The PRB is a list 
of parameters describing the I/O operation that has been requested. For 
example, if the programmer defines the I/O SVC as IOC (using OPD), a 
typical I/O call using the C380 machine instruction would be coded as 

shown on the following page. 
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SaP ROLE 
SHEET anal 
agai TOT SAMPLE 
GPBS 
OA0a3 « 
aee@e INC OPA eC 3RA,3 NEFINE r09C 
GPAs 
AAAE « 
CAAA yaaa aaa7s @LNM ePRR PRB ADAR TO MREG 
P BOABL AAAS 
GABA C3SP AAaRK yoc a SVC INSTRUCTION 
Vl hon RMR PRRRERECERRSESSESCEERCE LSE TERE SEER EES RR AES SD 
AIG 
4Aa3s aanag AAdi PRB NaATa a NEFINE PRB 
OA12 
AAaA Bars ENN 


The F800 instruction is a special form of the more general F8XX format. 
The letters XX indicate the SVC number to be executed (Section V lists addi- 
tional SVC numbers). Using this format, the M-register must point to an 
argument list with the following arrangement: 


e Word 0 - This argument list word specifies the number of argu- 
ments in the list. Word 0 of anI/O SVC contains al. If the SVC 
has no argument, word 0 contains a 0. 

e Word 1 - This argument list word contains a pointer to the first 
argument. Word 1 of an1/O SVC points to the PRB. 

e Word 2 through word n - These argument list words contain pointers 
to arguments 2 through n, respectively. These arguments do not 
apply to an I/O SVC since the PRB is the only argument. 

$aP ROLC SHEET ona 
gaat TOT SAMPLE 
aan Annan ae FAL a 
ies unos SVX npn »Faaa,8 DEFINE SVX 
a@aag4 © 
yous « 
apan 18gF 8 BAAe @LOM MARGLST LIST ANDR TO MREG 
wAai Baas 
: una2 FRED ARO7 Svx I0 | EXFCUTE CALL 
aee8 « 
@AaS «@ 
Gaie ROAST HAE A TR ETE NHRERTE EHR EH ENTE E ETE TEES 
oPii * 
eas v7ai B12 ARGLST PATA 1,PRB NUM ARGS, ANDRS 
P wage AAAS 
CE 
gaas wage gaié PRA DATA @ NEFINE PRB 
aais e 
anan Bale ENN 
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3.3 PHYSICAL RECORD BLOCK 


The Physical Record Block (PRB) is the list of parameters necessary for 

the supervisor to perform an I/O operation. The PRB is either four or five 
words long as shown in figure 3-1. The following paragraphs explain the use 
of these parameters. Variations of this PRB structure occur for non- 
standard I/O operations. Also, AD/DA and data module devices use a slightly 
different PRB format. Refer to the description of these device characteristics 
later in this section. 


3.364. WORD-0 


PRB Word 0 contains flags that are controlled by the operating system I/O 
routines, and a logical unit number specified by the calling program. 


3.3.1.1 BIT 0 (BUSY BIT). Bit 0 applies only to Initiate I/O calls. This 
bit is set during the I/O operation. When set, this bit indicates that the pro- 
gram should not disturb the PRB or referenced data buffer. 


3.3.1.2 BIT 1 (ERROR BIT). Bit 1 sets if an unrecoverable I/O error 
or a logical error (see bit 6) was detected in the last operation performed 
using this PRB. This bit resets if no error was detected. If Return on I/O 
Errors was not requested when the device was opened, the job aborts onan 
unrecoverable I/O error. If this bit is set following a Return, then PRB 
word 2 contains an error code greater than 200. Appendix A of this manual 
defines these error codes. 


3.3.1.3 BIT 2 (END OF FILE BIT). Bit 2 sets if the last record read 
with this PRB was an end of file. For most media an end of file is a record 
whose first two characters are /*, End of File applies only to reading and 
spacing opcodes. (Opcodes 00, 01, 05, 06, 14 and 15.) 


3.3.1.4 BIT 3 (OPCODE IGNORED BIT). Bit 3 sets if the last 1/O opera- 
tion was ignored because of the physical limitations of the I/O device. For 
example, an attempt to backspace a card reader sets this bit. Opcode Ig- 
nored is not necessarily an error condition. 


3.3.1.5 BIT 4 (END OF MEDIUM BIT). Bit 4 sets if the physical end of 
the storage medium was reached. Magnetic tape, cassette, and disc files 
provide end of medium detection. 


3.3.1.6 BIT 5 (BEGINNING OF MEDIUM). _ Bit 5 sets if the physical be- 
ginning of the storage medium was reached. 
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WORD 0 


WORD 1 


WORD 2 


WORD 3 


WORD 4 
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WHEN SET AT 
OPEN TIME 


WHEN SET AT 
RUNTIME 


OP CODES 00-29) 


WHEN SET AT 
RUNTIME 

(OP CODES 
100-119) 


0 1 
END OP el OPER 
ae ERROR | ALE 2 BY LOGICAL UNIT NUMBER (LUN ) 


ae FLAGS SET BY SYSTEM aeoeeneeee es 


INITIATE 
170 


INITIATE | OUTPUT conma SUPPRESS 
170 _RECORD USASCII CR/LF 
3 
SUPPRESS (a) 
BELL 


INITIATE 
170 


RETURN 
SEVERE 
ERRORS 


RETURN 
CORRECT— 

ABLE 
ERRORS 


OPEN 
FOR EX— 
CLUSIVE 
ACCESS 


FILE 
WRITE 
VERIFY 


DEVICE 
Loo 


1/0 OP CODE 


NOTES: 
() MAGNETIC TAPE, CASSETTE AND DISC FILE ONLY 
@) DATA TERMINAL ONLY 
3) APPLIES TO PRINTING DEVICES ONLY 
IF BOTH LOCK AND UNLOGK ARE SPECIFIED, THE 
DEVICE/FILE IS LOCKED FOR THE DURATION OF 


THE 1/O OPERATION 
FLAGS SET BY USER 


DATA RECORD LENGTH 


KEY KEY 
ISPECIFIED] RECOVERY| RECORD 
DESIRED 


FILE 
WRITE 
VERIFY 


DATA BUFFER ADDRESS/DEVICE ATTRIBUTES (OPEN CALL) 


KEY ADDRESS (CERTAIN DISC FILES ONLY, SEE SECTION IV) 


Figure 3-1. Physical Record Block (PRB) Format 
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3.3.1.7 BIT 6 (LOGICAL ERROR). Bit 6 sets to indicate than an error 
occurred that may have been a successful request under other conditions. 
A Logical Error applies only to file management. For example, a write 
with key to a key indexed file when the specified key already exists. When 
bit 6 is set, bit 1 is also set. 


3,3 8 BIT 7 (OPERATION TERMINATION). Bit 7 sets when the escape 
key (ESC) of any data terminal is pressed, terminating any ied or output 
e 


° 4 
ord mn ynrogvre e ha LMNIMNN pe An GD Aw “ x ° 
Vee 24h Pa vs ss witho ut comple t~zOn. bh Va L ead vu vor ations on } ev ingexe 


s, this bit indicates the return of a key value. 


3.3.1.9 BITS 8-15. This field contains the Logical Unit Number (LUN) 
for the I/O Operation as specified by the calling program. 


35560. “WORD J 


PRB Word 1| contains flags that are set by the user program, plus an opcode 
for the I/O operation as specified by the user program. The opcode appears 
in bits 8 through 15 of word 1. The flags appear in bits 0 through 7 cf word 
1. The function of these flag bits varies with the time that the bit is set and 
the operation being executed. The following paragraphs describe the function 
of the flags under the three possible circumstances. 


3.3.2.1 OPEN TIME FLAGS. If the calling program sets a user flag in 
word 1 when opening an I/O device or a file, the operating system assigns 
the following definitions to the flags: 


© Bit 0 - Initiate I/O: The calling program sets this bit to indicate 
that it is making an Initiate I/O call. When clear, this bit indicates 


TION 


eas nagqian Weariwta mall 
Le L/W Calle 


that the prograin is making an £xXECU 


e Bit 1 - Return on Uncorrectable Severe Errors: The calling pro- 
gram sets this bit to prevent the system from aborting the program 
if an uncorrectable severe error occurs during an I/O operation 
with the opened device. Instead, the system returns control to the 
calling program to recover from the error. 


8 Bit 2 - Return on Correctable Error: The calling program sets this 
bit to prevent the system from asking for operator assistance if a 
correctable severe error occurs during an I/O operation with the 
opened device. Instead, the system returns control to the calling 
program with bit 1 in word 0 set to recover from the error. 


® Bits 3 through 6 - These flags are unused during an open call. 


® Bit 7 - Open for Exclusive Access: The calling program sets this 
bit to indicate that the file or device being opened by the call cannot 
be shared, but must remain in exclusive control of the calling pro- 
gram until released. 
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3.3.2.2 RUNTIME I/O FLAGS. If the calling program sets a user flag in 
word 1 at runtime when requesting an I/C operation (Opcodes 00 through 29), 
the operating system assigns the following definitions to the flags: 


Bit 0 - Initiate I/O: The calling program sets this bit to indicate 
that it is making an Initiate I/O call. When clear, this bit indicates 
that the program is making an Execute I/O call. 


Bit 1 - Output with Reply: If the calling program sets bit 1 and the 
I/O device is a data terminal, the terminal performs an output, 
usually a question, and waits for a reply. If multiple programs 
are using a data terminal, the reply is given to the correct pro- 
gram. If the I/O is assigned to a device other than a data terminal, 
setting bit 1 produces an input operation only. 


Bit 2 - Automatic Record Termination: When bit 2 is set, data ter- 
minal input is automatically terminated upon reaching the input 
record length. Normal termination occurs when a carriage return 
is pressed. 


Bit 3 - Formatted USASCII Output or Suppress Bell on Input: When 
set during an output call, this bit instructs printing devices to use 
the first word of the output record as form control instead of data. 


Table 3-1 lists these form control characters. This function applies 
only to a Write USASCII output. When this bit is set during an input 
call, it prevents the bell on the input terminal from sounding. 


Bit 4 - Suppress CR/LF Echo on Input: Setting bit 4 prevents the 
data terminal from echoing an input of CR/LF. 


Bit 5 - File Write Verify: Setting this bit enables verification of 
disc data after writing. Use of this bit is described in the File 
Management Documentation in Section IV of this manual. 


Table 3-1. USASCII Format Control Word 


Reserved for future expansion. Should all be 0. 


Format before record. 
Format after record. 


No carriage-return 
Carriage-return 


No line feed 
Line feed 


No form-feed or second line feed 
Form-feed or second line feed 
(depending on Bit 14) 
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e Bit 6 - Device Unlock: Setting this bit allows other jobs to use a 
shared device that has been previously locked to the calling program. 


e Bit 7 - Device Lock: Setting this bit prevents other jobs that may be 
sharing the device from using the device until the device is unlocked. 
If both bit 6 and bit 7 are set concurrently, the device is locked until 
the I/O operation is complete. 


3.3.2.3 RUNTIME FILE FLAGS. If the calling program sets a user flag 
in word | at runtime when requesting a file operation (opcodes 100 through 
119), the operating system assigns the following definitions to the flags: 


e Bit 1 - Initiate I/C: The calling program sets this bit to indicate 
that it is making an Initiate I/O call. When clear, this bit indicates 
that the program is making an Execute I/O call. 


® Bit 1 - Key Specified: When set, this bit indicates that the calling 
program has specified a key to locate the desired file. The address 
of that key is contained in word 4 of the PRB. 


® Bit 2 - Key Recovery Desired: Setting this bit instructs the oper- 
ating system to recover a key and place it in the location specified 
in word 4 of the PRB if the record accessed has a key and bit 1 of 
PRB Word 1 (Key Specified) is not set. 


® Bit 3 - Return Record Size Only: Setting this bit transfers the 
length of the accessed record into the Data Record Length field of 
the PRB (word 2). No data transfer occurs. 


® Bit 4 - Unused for file management. 


e Bit 5 - File Write Verify: Setting this bit enables verification of 
disc data after writing. Use of this bit is described in the File 
Management Documentation. 


e Bit 6 - File Unlock: Setting this bit allows other jobs to use a 
shared file that has been previously locked to the calling program. 


e Bit 7 - File Lock: Setting this bit prevents other jobs that may be 
sharing the file from using the file until the file is unlocked. If 
both bit 6 and bit 7 are set concurrently, the file is locked until the 
I1/C operation is complete. 


36¢3e2 WORD ?Z 


Word 2 contains the data record length in characters for the I/O operation. 
Depending upon the type of I/O call, this field has various interpretations. 
For an open or change record length call (opcodes 7 and 12, respectively), 
this word sets the input record length for the logical unit. This record length 
limits the number of characters stored on subsequent input calls. For an in- 
put call, the I/O routines load this word with the number of characters actual- 
ly contained in the input record. For an output call, this word contains the 
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actual output character count. For utility operations such as back space or 
forward space, this word indicates the number of operations to perform. At 
the termination of these utility operations, the system returns the number of 
operations that were not performed (that is, Word 2 contains ''0"' if the opera- 
tion was successfully completed, and a number greater than zero if the sys- 
tem encountered an EOF or BOF before reaching the prescribed number of 
backspace or forward space operations). For operations on an AD/DA de- 
vice, this word is zero. 


When a return on error is specified (Bit 1, Word 0 set) and an error does 
occur during the specified operation, this word contains an error code great- 
er than 200 (Appendix A describes the error codes for the system). When 
this occurs, the word must be reset before issuing another I/O request using 
this PRB. Table 3-2 summarizes the functions of PRB Word 2. 


3.3.4 WORD 3 


Word 3 contains the data buffer address which is the starting address of the 
logical data buffer for input and output operations. 


An open call causes the device attributes word to be placed in word 3. There- 
fore, the data buffer address must be placed in word 3 following an open call. 


Table 3-2. PRB Word 2 
User/System Set 


Open Input record length specifica- 

tion (limit of number of char- 
Change record acters transferred on subse- 
length quent input calls) 


Input Input record character count 


Output Output record character count 


Back/forward space Number of operations to per- 


form 
Number of operations unper- 
formed 


Return with error Unchanged if no error occurred 
during operation 
Error code >200 if error oc- 
curred during operation 


Data Module Output data 
AD/DA Converter Zeros 


ee rE nn et 
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3.3.5 WORD 4 


Word 4 contains a key address that applies only to key indexed or relative 
files. Section IV of this manual explains disc files. 


3.4 FUNCTION OF SPECIFIC OP CODES 


Before a program can perform an I/O operation to a device or file, the pro- 
gram must open the device or file. An open call prepares the device or file 
to do an I/O operation. After the program finishes with the device or file, 

it should close the device or file. Closing a device or file does not unassign 
it from the job; it can be re-opened later and used again. Closing does ini- 
tiate proper end-action for the device to ensure that no data is lost. Devices 


are opened and closed using I/O supervisor calls. 


When the program makes an open call, the I/O routines place the device 
attributes word in PRB Word 3. Table 3-3 summarizes the device attributes 
for standard 980 peripherals. Table 3-4 defines the function of I/O operation 
codes (op codes). 


Table 3-3. Device Attributes Word after Execution of an Open Call 


System console 


] 1 Dummy device 
2 1 Can be rewound 
3 1 Can be forward spaced 
4 1 Can be back spaced 
5 i Printing device 
6 ] Model 733 ASR cassette 
7 1 Data terminal or CRT 
8 1 Disc 
9 i Input device 
10 i Output device 
1] ] USASCII transmission 
LZ 1 Binary transmission 
13 i Reserved | 
14-15 00 Peripheral device 
14-15 Ol Linked sequential file 
14-15 10 Relative record file 
14-15 1] Key indexed file 


456 Digital Systems Division 


(@) 
WO 943005-9701 


Decimal PRB 
Opcode Words Operation Function 


Table 3-4. Input/Output Opcodes 


00 4 Read USASCII One logical record is read from 
the specified LUN and stored in 
memory at the specified buffer 
address. The characters are 
packed two-per-word and the 
maximum number stored does 
not exceed the data record 
length specified in the last open 
or change record length call. 
The actual number of characters 
stored is returned in PRB Word 
2, and may be less than or equal 
to the requested input data rec- 
ord length. Any needed conver- 
sion to obtain internal USASCII 
representation of the data is 
performed. An end of file rec- 
ord, when detected, will set the 
EOF BIT. The most significant 
bit of all USASCII characters is 
equal to al in memory. 


01 4 Read Binary One logical record is read from 
the specified LUN and stored in 
memory in a manner similar to 
that described for Read USASCII. 
A character in this case is an 
8-bit byte, and any necessary 
data conversion to obtain the 


we av 


. . 
hinary format is rmecd,. 


n 
ase 7 mm tian v 


Eind of file records are detected 
and cause the EOF BIT to be set. 


02 4 Write USASCII One logical record is transferred 
from the specified buffer address 
to the indicated LUN. The num- 
ber of characters transferred is 
specified in PRB Word 2, and 
the data is packed two characters- 
per-word. If the formatted 
USASCII record bit (PRB Word 1 
bit 3) is al, the printing DSR's 
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Table 3-4. Input/Output Opcodes (Continued) 


Decimal PRB a | 
Opcode Words Operation Function 


02 will interpret the first word in 
the buffer as form control. Any 
necessary conversion from the 
internal USASCII representation 
to the medium storage format is 
performed. 


03 4 Write Binary One binary record is transferred 
from the specified buffer address 
to the indicated logical unit. The 
number of characters transmit- 
ted is taken from PRB Word 2. 
Any necessary conversion from 
binary to the medium storage 
format is performed. 


04 2 Rewind The physical device or sequential 
disc file is positioned at the be- 


ao 


05 3 Back Space The number of logical records 
Record specified in PRB Word 2 are 
skipped in the reverse direction. 
When an end of file record or be- 
ginning of medium status is de- 


: : 
tected, the operation stops with 


the appropriate PRB bit set and 
the operation count decremented. 
If an end of file caused the stop, 
the medium is positioned in 
front of the end-of-file record. 


06 3 Forward Space The number of logical records 
Record specified in PRB Word 2 are 

skipped in the forward direction. 
When an end of file record or end 
of medium status is detected, the 
operation stops with the appropri- 
ate PRB bit set and the operation 
count decremented. If an end of 
file caused the stop, the medium 
is positioned to the beginning of 
the record that follows the end of 
file record. 
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Table 3-4, 


PRB 
Words 


Operation 


Open 


Open Rewind 


Close 


Close, Write 
EOF 


Write EOF 


Change Record 
Length 


Read Device 
Status 


Back Space File 


Input/Output Opcodes (Continued) 


Function 


Initialize the logical and physical 
devices. PRB Word 2 sets the 
maximum input record length. 
The device attributes are re- 
turned in PRB Word 3. 


The I/O device is opened and re- 
wound as previously described. 


The necessary functions to ter- 
minate I/O to a device are per- 
formed. 


An end of file record is written 
and the device is closed. 


An end of file record is written. 


The maximum input record 
length is changed as specified in 
PRB Word 2. 


The Device Status Word is placed 
in PRB Word 2. The Device 
Status Word is device dependent 
and is individually described 
with each DSR in this section. 


The number of files (as delimited 
by end of file records) specified 
in PRB Word 2 are skipped in 
the reverse direction. If the 
start of the medium is encoun- 
tered, the operation stops with 
the beginning -of-medium flag 

set and the operation count decre- 
mented. Otherwise, the end of 
file bit is set. The medium is 
always positioned at the begin- 
ning of the first data record in 

a file. A backspace of one file 
remains within the current file 

so that if it is preceded by 
another backspace file it does 
nothing. A backspace two files 
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Table 3-4, Input/Output Opcodes (Continued) 


Decimal PRB 


Opcode Words Operation | Function 
14 actually skips one file. A back- 
(Cont'd) space record can be used to 
cross an end of file record in the 
reverse direction, 

ies 3 Forward Space The specified number of end of 

File file records are skipped in the 
forward direction. If the end of 
the medium is encountered, the 
operation stops with the end of 
medium bit set and the operation 
count decremented. Otherwise, 
the end of file bit is set. 

16 z Unload Magnetic tape and cassette units 
are rewound and unloaded. Mag- 
netic tape units are placed off- 
line. 

17-18 Reserved Ignored by all DSR's. 
19/20 Write/Read Device dependent calls supported 

Direct by some DSR's for transfer with- 


out data conversion. Data formats 
are described with individual DSR 


description in this section. 
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3.5 INITIATE AND EXECUTE I/O CALLS 


The calling program sets bit 0 in PRB Word 1 to signify Initiate I/O call and 
clears bit 0 to indicate Execute I/O call. The Execute call suspends the 
user program until the entire I/O operation is completed, making the I/O 
appear to be a single, instantaneous operation of the calling program. Ina 
system with many programs executing, the Execute call does not degrade 
total system efficiency since other programs are executed during the I/O 
call processing time. When one or a small number of programs are running 
in the system, the computer is substantially idle during the I/O transfers. 


If the Initiate/Execute Bit is al, the system returns to the program for fur- 
ther execution immediately following anI/O SVC. A program that is fre- 
quently used and has high I/O activity can use the Initiate Call to increase 
program throughput and attain maximum speed from I/O devices. The PRB 
from which an initiate I/O call has been made and its associated data buffer 
should not be modified until the I/O operation has been completed. The pro- 
gram can monitor the PRB Busy Bit (Word 0, bit 0) to detect completion of 
the 1/O (if the Busy Bit is al, I/O is not complete). Doing an Initiate I/O 
call to a device while a previous call to the same device remains incomplete 
suspends the job until the first call is complete. 


If an Initiate I/O call has been issued and processing is complete to the point 
that the I/O operation must be complete in order to continue, use the Wait 

for I/O Complete supervisor call to suspend the program. This SVC converts 
the Initiate call that shares the same PRB to an Execute call. 
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A typical Wait for I/O may look as follows: 


SAP ROLC 
SHEET anat 
GAB IOT SAMPLE 
pAQR Baas WAIT FOU 222A 
WAAR Sve OPH »>FRAG,8B MEFINE 8VvC 
AaAas 
AAAe 
BABA {AAP BADE @LOM BARGLST LIST ANDR TO MREG 
P @fA1 Anas 
" @AAD FRQR BOAT Svc walt FXFCUTE CALL 
AGAR -«# 
@AUG « 
AAT ee PRR HH ER HEH EEK EH EHEREERETES 
AAX1{ «* 
BPAY AMA! AA12 ARGLST NATA 1,PRB NUM ARGS, ADDRS 
P OAAA AAAS 
AAs e 
A@AAS A222 AALS PRB DATA >»8A22 LUNO »99 
AAGe& QAAP gays DNATA 2»Q~AAD WAS FRMTTD wRITE 
CAAT BABA AAA MATA 10 BR CHROFPMT CNTRI 
P @AB8 arno gAat7 MATA BLIFFER ADAR OF AATA 
ae{s «* 
AAIS «& 
BAAD AAAK BAZe RUFFER DNATA 29096, !'SAMPLE,! 
@AQ4 OSC 
BABR CNOY 
a@aec CCCs 
GAAN AFFF 
AA2i wf 
APgA yaee ENN 


3.6 STANDARD USASCII RECORDS 

DX980 uses two types of USASCII records, formatted and unformatted. An 
unformatted record is a versatile record that is used to take advantage of 
special characteristics of a device. Therefore, unformatted records are 


usually installation and device dependent, whereas formatted records rely 
on the DSR to allow for specific device characteristics. 


Formatted USASCII records use the first word of the record to control phy- 
sical device formatting on printing devices. To output an 80-character rec- 
ord in the formatted USASCII mode, the program must make a call for 82- 
characters. The extra two characters are the first word that contains format 
control. Similarly, when an 80-character formatted record is read, the 
program must make an input call for 82-characters to ensure that the entire 
record is read. The program can ignore the first word. 


To use the formatted USASCII mode, bit 3 of PRB Word 1 should be set to a 
1. Bit 3 is meaningful only for a Write USASCII operation (Opcode 02) that 
is directed to a printing device. Storage devices write the format control 
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character at the beginning of the data without modification. However, al- 
ways set bit 3 to ensure device independence if the designated output device 
is changed. | 


The format control is not punched on paper tape, since that medium assumes 
a one-record-per-line format regardless of the format specified. 


3.7 I/O ERRORS 


Three types of errors are possible when executing an I/O operation: logical 
errors, severe errors, and fatal errors. Two of these types, logical and 
fatal errors, result from an error inthe calling program. The other type, 
severe, results from a malfunction of the I/O device. When severe and fatal 
errors occur, the operating system prints an error message on the system 
console. This message contains an error number that identifies the type of 
error and the reason for the error. Table 3-5 lists the error numbers for 
I/O errors, their level of severity, and the cause of the error message. 

The following paragraphs describe the three types of errors. 


Table 3-5. I/O Errors 


Severity Description 


Severe Correctable Device Not Ready 


Severe Uncorrectable Controller Error 
Severe Correctable Data Error 

Severe Uncorrectable Controller Busy Error 
Severe Correctable Write Protect Error 


Severe Uncorrectable End of Record Sequence 
Error 


Severe Uncorrectable Read-After-Write 
Error 


Severe Correctable Offline 


Fatal Illegal I/O Opcode 


3.7.1 LOGICAL ERRORS 


Logical errors occur only during file management operations and are the 
result of an error in the user call. For example, a user call to create a 
record with key when the key already exists in the file. This type of error 
is not catastrophic to execution of the program. Therefore, when a logical 
error occurs, the operating system returns control to the calling program 
so that it can take an alternate course of action. When the system returns 


a 
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control to the program, it also sets the Logical Error and Error flags in the 
PRB (word 0, bits 6 and 1), and places the error number of the error in the 
Record Length field of the PRB (word 2). 


3.7.2 SEVERE ERRORS 


Severe errors occur during I/O operations and are the result of a status 
condition of the peripheral device that prevents it from performing the re- 
quested I/O operation. The error condition may be correctable through 
operator intervention, or it may be uncorrectable. 

3.7.2.1 CORRECTABLE. A correctable severe error results from a 
status condition of the I/O device that the operator can fix. For example, a 
printer that is out of paper or a card reader offline causes a correctable 
error if the system can detect the required status condition. When such an 
error occurs, the system prints a message on the system console asking the 
operator to decide if he can correct the malfunction. The operator responds 
either by correcting the condition and then entering the response YES, or by 
entering the response NO. If the operator enters a NO response, the error 
becomes uncorrectable. If the operator enters a YES response, the system 
retries the operation. 


The user can choose to bypass the operator notification step and return 
directly to the calling program when a correctable error occurs. Setting 
PRB word i, bit 2 during the SVC that opens the I/O device selects this 
option. If the site does not have a full time operator, this option allows the 
user to select an alternate I/O device rather than wait for the operator to 


correct the malfunction on the original device. 


3.7.2.2 UNCORRECTABLE. A severe error becomes uncorrectable if the 
operator enters a NO response to the system's request for a correctable 
error, or if the faulty status indication from the device is the result of an 
inherently uncorrectable error such as failed components in the peripheral 
interface. Uncorrectable severe errors abort the associated program. How- 
ever, the user can choose to avoid this outcome by setting PRB word 1, bit 

1, during the SVC that opens the I/O device. Setting this bit instructs the 
operating system to return control to the user program if an uncorrectable 
severe error occurs. When selecting this option, the user program must 
allow for alternate devices or remedial routines to cope with severe errors. 


3.7.3 FATAL ERRORS 


Fatal errors are the result of errors in the user program that cannot be 
reconciled by returning control to the program. For example, a call to read 
information from a line printer is impossible to execute. Since the error is 
part of the program or job control coding, the program is unable to adjust for 
the error. Fatal errors abort the associated program. This outcome can- 
not be avoided. . 
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Change 1 
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03 
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16 
17 
18 
19 
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NOTES: 


Full Duplex 


Terminal 
Read USASCII Returns EOF Responds 
(/* = EOF) 
Read Binary Returns EOF Error 


Open-rewind CR/LF output 


Write USASCIT | Responds Responds | 

Write Binary | Error | 

| 

Rewind | 

Back space record | 

Forward space | Error | 
record 

| | 

i i 

| { 

Open | CR/LF output | 

i i 

: | 


Close 
Close-write EOF 


Responds 
LF 3 lines 


seen ennai Ae eNO A EN Am EL LT ET SY rT Sie 


I eA RENE le eS TR A AR LN - e A S S ES RR AL RN oN re NNT aS 


i 

Write EOF LF 3 lines | 
Change record Responds 
length 
Read device status Responds 
Back space file J Error 
Forward space file Responds Error 
Unload Ignores Ignores 
Not assigned t | 
Not assigned Ignores Ignores 
Write direct Responds Responds 
Read direct Responds Responds 

1 Ignores blank frames and delete (rubout) frames. 

2 End of medium not detectable. 


3 Reads specified number of frames and stores them 
packed as received into user buffer. 


4 DSR translates invalid columns to valid characters 
without error indication. 


5 Stores 12-bit card image, right-justified within 
words of user buffer. Character count = 160 
for complete card. 


6 End of medium = physical end; logical end not in- 
dicated. 


Paper Tape 


Reader 


(jes BOF 


Responds [> 
(/* = EOF) 


Error 


Responds > 


Responds 


Responds 


Error 


Error 


Responds 


Ignores 


Error 


tR nds 1 E 
Responds 
(/* = EOF) 
Error 
i 


Responds {> 


Ignores 


Ignores 


Error 


Responds eS 


10 


Response From Device 


Paper Tape Card Magnetic Line Tape 
Punch WER Stas eee pe Pace ae ree | 


Responds [>, Error 


At least 1 
card read 


(/* = EOF) [D> 


At least 1 
card read 


(/* = EOF) 


Erro 


Responds (Er- | Error | 
ror if after 
output) e&> 
Responds (Er- 
ror if after | 
i 


Error 


EE EN TN pI 
e 


Error Responds 
lea Responds > Responds (Er- 
ror if after 
output) | 
Responds Responds Responds 
Responds 
(Punches 
leader) 
; Responds ; Responds i 
| EOF Fol- | Error | | | 
lowed by 
trailer 
i ' L 
| EOF Foi- Error | 
| lowed by | t 
trailer | 
Ignores ; Responds 
Ignores | Responds | 
Error Error Responds 
lee | Responds [> | Responds > | 
Ignores | Ignores Responds 
| | { Ignores 
Ignores | Ignores Ignores 
Error | ' Error Error | 
Error | Responds > Error 


End of medium = current position when op complete; 
performance of op when not at EOM destroys data 
from current position to EOM. 


EOM status possible with decremented record count 
returned, 


If opened for exclusive access, position is retrieved 
from disc when opened and stored on disc when 
closed. 


Error 


Error 


Error 


Generates 
form feed 


Error 


Error 


Responds 


Generates 
form feed 


Responds 


Generates 
form feed 


Generates 
form feed 


Ignores 


Responds 
Error 


Error 


Ignores 
Ignores 
Error 


Error 


The new record does not have an index key. A replace 


operation occurs if not at end of medium and both the 


old record and the index key (if any) are deleted. 


19 eereenreeeterpeene 
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13 


Relative Key-Index 
Record File File 


Sequential 


(Error if after (error if after | {End of medium | Responds Responds i> 
output }(/* = if after output) 
EOF) {> 
(Error if after (End of me- Responds Responds kD 
output) (/ dium if after 
EOF) output) 
Responds | Responds fp i | 
(/* = EOF) Acts asa Acts as a 
replace / replace / 
add add 
Responds Responds > function function he 
(/* = EOF) | | 
Responds Responds Responds Responds 
Responds Responds Responds: EOF detection not 
; possible, since not allowed 
Responds > | Responds | Responds: EOF detection not 
possible, since not allowed & 
Responds | Responds [> Responds Responds 
| Responds 
| I 
| i i Responds Responds 
| | | Close, but does not write 
| | | EOF 
| | Error Error 
| | 
Responds Responds 
Responds Responds 
Responds | Response results in begin or 
(Revert Reaponda end of medium 
after output) | 
Responds Ignores | Ignores Ignores 
Ignores | { 
Ignores Ignores | Ignores Ignores 
Error | Error | Error Error 
Error Error | Error Error 


Options allow recovery of both data record and index 
key, or functional deletion of both data record and 
index key from file. 


All characters are written directly from the buffer; 
caution should be exercised when the device has paper 
tape or cassette attached. 


This operation expands the read ASCII key to include 
a set of control characters. 


Table 3-6. Device Response to Sequen- 


tial I/O Commands 
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3.8 INDIVIDUAL DEVICE CHARACTERISTICS 


All sequential I/O devices and sequential disc files restrict the operations 
that can successfully be performed with them. For example, devices capable 
of both reading and writing cannot arbitrarily switch between Read and: 

Write modes. Other restrictions vary from device to device. Do not close 
and re-open a device to circumvent these restrictions since the results will 
vary for each device. Table 3-6 catalogues responses to I/O commands, in- 
cluding read-after-write restrictions. Most devices represent an end of file 
with a /* record, but some devices do not. Because of this inconsistency, 
always use the end of file command in lieu of a /* data record. 


3.8.1 DATA TERMINAL AND CRT DEVICES 


The Data Terminal Device Service Routine (DSR) operates with any of several 
devices interfaced using the Communications Module (TI Part Number 
966637). These devices include Texas Instruments Models 730 and 733 Data 
Terminals, Model 912 CRT, teleprinter devices similar to the 33 ASR or 33 
KSR, and the Hazeltine 2000 CRT. The DSR operates differently with each of 
these devices to compensate for operating variations of the devices. The DSR 
allows input to come from the paper tape reader device or the teleprinter type 
device. The DSR echoes input characters to the terminal as they are entered. 
For this reason the DSR does not use the terminals in true full-duplex mode. 
Performing a read direct operation with the full duplex terminal expands the 
read USASCII capability to accept the control code defined in table 3-7. 


Do not press the keys on the keyboard during a data 
transfer using either the tape cassette of an ASR 

733 or the paper tape of an ASR 33. The printer 
will not respond during the data transfer, and press- 
ing the keys may result in loss of data. 


3.8.1.1 INPUT/OUTPUT OPERATION. The PRB of the calling program 
directs output to the data terminal. If the formatted USASCII mode is speci- 
fied for output, the DSR adds carriage and form control as directed in the 
first word of the record. An input call rings the terminal bell unless PRB 
Word 1, bit 3 (Suppress Bell) is set. The DSR accepts input characters from 
the keyboard until a carriage return is selected. At that time the DSR echoes 
a carriage return - line feed to the printer. Regardless of how many charac- 
ters are typed, the number of characters stored is limited by the record 
length supplied in the open SVC. Two variations of this input operation are 
available with special PRB bits. If the Automatic Terminate Bit is set (PRB 
word 1, bit 2), the input terminates on a carriage return or full buffer, 
whichever occurs first. The second option suppresses echo of the carriage 
return - line feed when the record is terminated. The user selects this op- 
tion by setting PRB word 1, bit 4. All input characters are then echoed to 
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Table 3-7. USASCII Control Characters 


Hexadecimal | Control Control Valid Character Postabl System 
Code Function | Character on Read Direct nF . : |Special 


NULL |Shift/CTRL/p 
ICTRL/a 


CTRL/x 
CTRL/y 
CTRL/z 


02 | STX CTRL/b i x 

03 ETX CTRL/c x 

04 EDT CTRL/d x X(on 

utput) 

05 ENQ CTRL/e x 

06 ACK CTRL/f x | | 

07 BEL CTRL/g x | 

08 BS CTRL/h x | 
09 HT CTRL/i x | 

OA LF |CTRL/3 x | 

OB VT aa x | 

ite FF jCTRL/1 x } 

ie — : 

OE SO CTRL/n x 

OF SI CTRL/o X 

10 DLE ere x | | 

11 DCl CTRL/q v4 | | 

12 DC2 CTRL/r x | | 

13 DC3 CTRL/s x | | 

14 DC4 CTRL/t x 

15 NAK CTRL/u | as 

16 SYN |CTRL/v x | : 

CTRL/w xX | | 
| 
| 
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Table 3-7. USASCII Control Characters (Continued) 


Hexadecimal] Control Control Valid Character 
Function Character on Read Direct 


Shift/CRTL/k 
Shift/CTRL/1 
Shift/CRTL/m 
Shift/CTRL/n 
Shift/CTRL/o 


the printer as they are received from the keyboard until the buffer is filled. 
Special characters are not placed in the buffer nor echoed to the printer. 
Tab and Escape also terminate an input record as described below. 


368012 


LINE EDITING. The operating system provides several online 


editing features as follows: 


Delete Input Characters - Backspace (CTRL/H) and +~— (left arrow) 
deletes one input character. On Silent 700's, the print head back- 
spaces and the DSR supplies a line feed when the first valid char - 
acter is entered. CRT's perform a left-cursor. Teletype machines 


type a backward slash (\). 


Delete Input Record - Rubout deletes an entire input record which 
may then be re-entered. 


List Input Record - CTRL/N lists the input record as currently 
stored. 


Terminate I/O - The escape key terminates any active I/O opera- 
tion. The Terminate-on-Escape Bit in the PRB system flag area 
(Word 0, Bit 7) is set. 


Tab - Tab is a special character than can be detected by the user 
program during an input call. The input is immediately terminated 
and the tab is placed in the data buffer, but the input record length 
in the PRB does not reflect its presence. 


System Mode - If the data terminal is the system console, CTRL/O 
puts the data terminal in system mode. When in system mode, any 
user output assigned to the terminal is held in a queue until the ter- 
minal returns to user mode. 

User Mode - If the data terminal is the system console, CTRL/U 


puts the data terminal in user mode. When in user mode, any sys- 
tem output assigned to the terminal is output without regard to mode. 
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The following features insert or delete text within 
a record and are convenient for use with a CRT 
terminal only. 


NOTE 


e Increase Character Count - Line Feed or (down cursor) increases 
the input character count by the length of a line if it does not exceed 
the record size specified in the open SVC. Line length is specified 
in the Physical Device Table (PDT). 


e Decrease Character Count - (up cursor) decreases the input char- 
acter count by the length of a line. Line length is specified in the 
PDT. 


e -—(right cursor) increases the input character count by 1 if the 
input character size does not exceed the record size specified in 
the open SVC. 


e Freeze the output - While the terminal is outputting, pressing the 
control D key halts the current output. Pressing any other key 
while in this mode will reactivate the output. 


3.8.1.3 INTERACTIVE EXTENSIONS. Four device-dependeént features 
are included in the DSR for data terminal input operations. They are ac- 
tivated by four separate flag bits in the PRB and may be used in several 
combinations. These flags do not apply to, and are ignored by, other device 
service routines. The features are: 


e Do not ring bell on input call. 


° Do not echo carria 
® Output with reply operation. 


® Terminate input automatically when the data record length is 
reached. 


3.8.1.4 OUTPUT WITH REPLY. The Data Terminal DSR provides a spe- 
cial output/input function for question and answer operations. Setting word 
1, bit 1 (output with reply) in the input PRB directs the system to locate an 
output PRB immediately following the input PRB. This bit should not be set 
in the output PRB. The output (second) PRB is executed first. The respond- 
ing input is executed immediately, even if multiple programs are using the 
same data terminal. If the I/O is assigned to a device other than a terminal, 
it is considered an input operation only. All other DSR's ignore the output 
with reply PRB bit and execute only the first (input) PRB. 
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3.8.1.5 FORM FEED DETECTION. The data terminal DSR detects the 
form feed function when it is issued by either a formatted output record or a 
Form Feed Character in the output data stream. The terminal outputs six 
blank lines when a form feed is detected unless the Home-on-Form-Feed 
PDT Bit is set. In that case a home cursor command is issued. 


3.8.1.6 OPEN/CLOSE OPERATIONS. An Open or Open-Rewind SVC 
causes a CR/LF to be performed. A Close causes no special action, buta 
Close-Write EOF writes three blank lines on the terminal. A Write End-of- 
File command also results in three blank lines. 


3.8.1.7 AUTOMATIC LINE CONTINUATION. The DSR can print data 
records up to twice the carriage size on consecutive lines and without data 
loss. This feature is subject to two restrictions: 


(1) The print head must be at the left margin when the record begins 
to print | 


(2) Formatted output must be used 


3.8.1.8 FORMATTED OUTPUT. This DSR supports formatted USASCII 
output. A form feed is defined as six blank lines unless the Home-on-Form- 
Feed PDT Bit is set. If that bit is set a form feed is interpreted as a home 
cursor operation. Unformatted I/O is device dependent. 


3.8.1.9 CARRIAGE RETURN DELAY. Each different terminal device re- 
quires from 1 to 5 null characters following carriage return commands to 
allow for print head travel time. The DSR checks the Physical Device Table 
(PDT) to determine the type of terminal so that it can generate the proper 
number of null characters. 


3.8.1.10 LINE FEED DELAY AND LINE CLEARING. A Clear to End-of- 
Line code is sent following line feed operations. For a CRT, this clears the 
display lines before output is done on a particular line. For other terminals 
it provides a one character delay. This delay following line feeds is equiva- 
lent to a null character. 


3.8.1.11 CHARACTER LOSS. Character loss does not occur if unformat- 
ted USASCII output with imbedded CR/LF's is used. For Silent 700's suffi- 
cient null characters are sent following a carriage return to avoid character 
loss. For other devices a single null character follows each carriage return. 
For all devices a clear end-of-line character is sent following a line feed. 
Unless the device is a CRT, this character is equivalent to a null character. 
Each line of a CRT is cleared before output is done on that line. 
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3.8.1.12 REPEAT KEY. The repeat key may be used to transfer a charac- 
ter repeatedly. The number of characters read will be echoed and printed. 


3.8.1.13 CTRL/H ON SILENT 700. The print head back spaces one posi- 
tion each time that the back space key is activated until the entire input rec- 
ord is deleted. The first new character echo following a sequence of back 
spaces is preceded by a line feed. 


3.8.1.14 CTRL/H ON CRT. The cursor moves left one position each 
time that the back space or left cursor key is activated until the entire input 
record is deleted. 


3.8.1.15 CTRL/H ON ASR/KSR 33. A backward slash is typed each time 
that the back space key is activated until the entire input record is deleted. 


3.8,1.16 ERROR CONDITIONS. No task or system errors are generated by 
the Device Service routine. Read operations with timeout specified may 
cause data error indication in the PRB. (See paragraph 3.8.1.19). For de- 
tectable input errors the DSR discards the characters, echoing a Bell to the 
terminal. Opcode errors cause an abort condition. 


3.8.1.17 DEVICE STATUS WORD. A Read Device Status call reads the 
status register of the Communications Module and transfers it to the calling 
program. If bit 0 of the status word is a 1, the status is not valid and must be 
requested again. Bit 0 can only be set toa l if the Communications Module 
receives a character between the time the DSR is entered for the read status 
and when the status is actually read. This is an unlikely occurrence, since 
the window for this to happen is less than 50ps. Use of the status bits varies 
with the type of terminal. Refer to the applicable Terminal User's Guide 
listed in the Preface of this manual for the specific use of each status bit. 

The status word bits are assigned as follows: 


e Bit 0 - Invalid status if set. 

e Bits 1 through 10 - Always zero. 
e Bit 11 - Ring indicator. 

a Bit 12 - Reverse channel receive. 
e Bit 13 - Data carrier detect. 

® Bit 14 - Clear to send. 


e Bit 15 - Data set ready. 


eee 
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3.8.1.18 PAPER TAPE INPUT. The paper tape reader on the teletype de- 
vices may be used to input data as if the data was being typed from the key- 
board. The user must momentarily set the start button for each record. Each 
record must be delimited by a carriage return (CR) and at least three "don't 
care'' characters. All rubout characters at the beginning of each record will 
be ignored. 


3.8.1.19 USER SPECIFIED TIMEOUT ON READ OPERATIONS. Read oper- 
ations may be timed out by setting bit 5 of the user set flags or the read PRB. 
If this bit is set, word 4 of the PRB is a pointer to a one-word field containing 
a right justified, non-zero, 8-bit timeout value in seconds. A >FF specifies 
no timeout. 


The data terminal device must be opened to return on correctable errors. 
(See paragraph 3.3.2.1.) A timeout will be indicated if the error bit of the 
system set flag is set and the returned error code is a 210. 


3.8.2 MODEL 733 ASR CASSETTE 


The Device Service Routine for the 733 ASR cassette handles 1200 baud cas- 
sette units. Each cassette is treated as a separate physical device. The 
DSR is functional only if the 733 ASR is operated in the line mode for USASCII 
processing. The device must include 1200 baud and remote device control 
options. The 733 ASR must be interfaced to the computer using the Com- 
munications Module. The DSR supports reading USASCII records that have 
been recorded in the continuous mode. 


3.8.2.1 TAPE RECORD FORMATS. Some data conversion is done prior 
to the recording on tape. The conversions described in this section apply to 
both Binary and USASCII records. These conversions are performed after 
initial conversions that vary between Binary and USASCII records. 


An USASCII cassette tape record is defined as data followed by a carriage 
return character. A record is more than one physical tape block long if it is 
greater than 86-characters (including the CR). The record always begins on 
a physical block boundry. All USASCII tape records require at least one 86- 
character tape block for storage. Since a CR determines the end of a physi- 
cal record, physical USASCII records rarely correspond exactly with logical 
USASCII records that were output by the DSR. For example, if an USASCII 
record ends with a carriage return/line feed, the LF becomes the first char- 
acter of the next tape block following the rest of the record. Since the DSR 
does not pass the CR or the LF to the user when reading USASCII, this 
arrangement causes no problems. 


All USASCII records require at least one tape block for storage. Short out- 
put logical records may tend to overrun the capacity or the 733 ASR recording 
buffer in the device. For this reason the DSR adds delete characters to all 
records as necessary so that any two consecutive tape blocks contain at least 
60 characters. 
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3.8.2.2 USASCII RECORDS. To allow offline cassette preparation and 
playback, cassettes are treated as printing devices instead of storage de- 
vices. Therefore, all formatted write USASCII operations expand the for- 
mat specification into form control characters before writing on tape. For- 
matted expansion is identical to the data terminal DSR expansion. 


Since a carriage return separates records on tape, the DSR appends a CR to 
the end of any USASCII write operation that does not have at least one CR in 
the data to be written. The hexadecimal characters 10 through 14 are re- 
served control characters and are not allowed in USASCII records. If one 

of these characters is encountered, the DSR converts it to a delete charac- 
ter before transmission to the 733 ASR. A write direct operation is equiva- 
lent to a USASCII write operation and is, therefore, not supported. The most 
significant bit of an USASCII character is not written on the tape. To trans- 
fer memory image data to cassette a write binary must be used. 


The USASCII read operation passes all recorded characters from hexadeci- 
mal 20 to 5F to the caller. @WSASCII records are terminated by a carriage 
return on the tape, but the CR is not placed in the caller's buffer. Read di- 
rect passes all recorded data, including delete and null characters. It is 
also terminated by a carriage return and the CR is passed to the caller. 


3.8.2.3 BINARY RECORDS. Each word in memory for a binary record 
is written on the tape as three 7-bit characters. For example, the 16-bit 
word: 


ABCDEFGHITKLMNOP 
It is written on tape in three 7-bit characters as follows: 
1l10ABCD 
1EFGHIJ 
1KLMNOP 


3.8.2.4 END-OF-FILE RECORDS. An end-of-file in both binary and 
USASCII modes is a record with the first two characters being a (/*) combina- 
tion, followed by a carriage return, line feed, X-off, and more than one delete 
(rub-out) character. A write end of file command writes a /,*, carriage re- 
turn, line feed, X-off, and 256 delete characters. 


3.8.2.5 OFFLINE PREPARATION AND PLAYBACK. USASCII records 
can be prepared offline by typing with the recording cassette in the Line 
mode (RECORD switchiin the LINE position). Any cassette tape recorded 
using the USASCII write operation can be listed offline. An offline end of 
file is a ''/*'' followed by a carriage return. Binary records cannot be pre- 
pared or listed offline. 
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3.8.2.6 TAPE POSITIONING FUNCTIONS. Forward Space Record and 
Forward Space File commands operate with the DSR reading the cassette at 
its normal read rate. The Back Space Record command is not implemented. 
For USASCII records less than 86 characters each, a Block Reverse (DLE, 
8) operation is equivalent to a Back Space Record command. A Back Space 
File command assumes that the cassette was positioned at the beginning of 

a file when it was opened. The tape then block-reverses to the open point 
or to the last end of file read in the forward direction from the open point. 
The Backspace File opcode backspaces only one file. Unload rewinds the 
tape and leaves the cassette positioned on the clear leader of the tape. 


3.8.3 PAPER TAPE READERS 


The paper tape readers read 8-level paper tape in either an USASCII, Binary 
or Direct mode. Support is provided for ASR33 type devices and high speed 
paper tape readers. 


3.8.3.1 RECORD FORMATS. USASCII records are read as one tape frame 
per character. The most significant bit of each character is set to a binary 
one regardless of its state on the paper tape. USASCII records may be delim- 
ited by either of the following sets of characters: 


Reader Off (XOFF), delete, delete 
Carriage Return (CR), Line Feed (LF), delete, delete 


Records delimited by the second set of characters may have any set of char- 
acters between the CR and the LF, and any one character between the LF and 
the delete, as follows: 


CR, X,, LF, X>, delete, delete 
where, 
X, is any set of characters not containing an LF 
X2 is any character 
Blank, punch on, punch off, and delete (rubout) frames are ignored. 


Binary records are read as four frames per word using the conversions 
shown in table 3-8. Records are terminated by an X-off character. 


Read direct (opcode 20) is implemented for the paper tape reader. It operates 
the same as read USASCII except for the following characteristics: 


e The entire 8-bit character is stored unmodified. 

e No characters are ignored; deletes and null frames are stored. 
e There is no end of record character. 

e No end of file record is recognized. 


e Read direct paper tape on an ASR33 type device does not always read 
the number of characters for which the device was opened. The user 
should depend on the returned (PRB word) character count. 
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3.8.3.2 ERROR DETECTION. The DSR detects invalid punches during a 
read binary operation only. An illegal operation aborts the job. 


3.8.3.3 END OF FILE RECORDS. In USASCII and Binary modes any rec- 
ord beginning with a slash-asterisk (/*) is detected as an end of file record. 
For Binary mode thé ''/*'' record is not stored in memory. 


.8.4 PAPER TAPE PUNCH DEVICES 


3 

The paper tape punch devices punch data on 8-level paper tapes in an 
USASCII, Binary, or Direct format. Support is provided for ASR33 type de- 
vices and high speed paper tape punches. 


Table 3-8. Binary Internal Code to Paper Tape Binary Code 


Internal Tape Code 


Frames 


1 00000 001 
00000 010 
10000 011 
00000 100 
00010 101 
00010 110 
10010 1l1l 
10011 000 
00011 O01 


9 00010 000 
| 


00011 010 
10011 O11 
00011 100 


10011 101 
10011 110 
00011 111 


i) a cs A os Oo > °° Oa 
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3.8.4.1 RECORD FORMATS. USASCII records are written as one frame 
per character. Data is punched directly from the data buffer with no conver- 
sions. Each record is terminated with a Carriage Return (CR), Line Feed 
(LF), reader-off character (X-off), and two delete (rubout) characters, and 
a punch-off character if the device is a Model 33 ASR. Binary records are 
punched as four frames per word. The end-of-record indicator is the same 
as for the USASCII write operation, without the carriage return and line feed. 
Write Direct punches data directly from memory as in a USASCII write oper- 
ation, but no end-of-record indicator is added to the punched data. Write 
Direct is not supported on Model 33 ASR paper tape punches. 


3.8.4.2 ERROR DETECTION. The punch does not detect punch errors. 


3.8.4.3 END OF FILE RECORDS. An end of file record is defined for 
both Binary and USASCII modes as a record beginning with ''/*''. A write end 

i of file punches a ''/*'' followed by CR, LF, X-off and two delete characters, 
then a 10 inch blank tape trailer. 


3.8.4.4 OTHER OPERATIONS. Open-rewind punches 10 inches of leader 
on the paper tape punch. 


3.8.5 DMAC AND I/O BUS LINE PRINTERS 


Characters are printed directly from the user's data buffer. If the formatted 
USASCII bit in the PRB is set, the first word of the data buffer is used for 


format control. 


3.8.5.1 STATUS. If the printer is in a Not Ready condition (as opposed 
to offline), the DSR prints a Printer Not Ready message on the system con- 
sole terminal. Offline status is not detectable. 


3.8.5.2 ERRORS. The calling program aborts on illegal operations. If 
the device is not ready, the DSR generates retry errors. 


3.8.5.3 1/O BUS PRINTER. A carriage return precedes any form feed 
operation. Bold letter records may be output by setting bit 1 in the user set 
flags of the PRB. Bit 1 instructs the line printer to overprint the line with 


redundant text. 
3.8.5.4 OTHER FUNCTIONS. The page moves to top of form when the 
following operations are done: 

e Rewind 

e Open Rewind 

6 Close and Write EOF 

e Write EOF 
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The printer performs a carriage return and a line feed when it receives an 
Open command. 


3.8.6 CARD READER 


For handling formatted I/O records, cards are considered as a hard-copy 
medium rather than a storage medium. Therefore, do not punch the format 
control characters when preparing the input deck. In addition the deck must 
follow an implied one-record-per-card structure. The following restric- 


tions are imposed upon cards as a storage medium: 
® An implied CR/LF on every record 

e Each blank line is indicated by a blank card 
© A form-feed cannot be stored 


® A maximum limit of 80-characters per record. 


3.8.6.1 RECORD FORMATS. USASCII records actually appear as Holler- 
ith punches on the cards. An USASCII read operation causes the DSR to con- 
vert the Hollerith characters to USASCII characters. Table 3-9 lists the 
characters and their Hollerith and USASCII codes. Binary records are 
punched two characters per card column as shown in Table 3-10. 


Read Direct (opcode 20) reads a card without any data conversion. The data 
is stored in memory as one card column per word. The word is right- 
justified with bits 0 through 3 equal to 0. The least significant bit in memory 
represents card row 12 (top of card). The input record length must be given 
in characters, or 8-bit bytes, and requires a character count of twice the 
number of columns to be stored. If the character count is odd, only one byte 
of the last column is stored. That byte is stored in the most significant half 
of the buffer word. 


wee I ee 


3.8.6.2 ERROR DETECTION. The DSR detects errors for timing and in- 
valid punches. A timing error occurs when either an interrupt for one card 
column is not serviced before the next is read, or when the punches in the 
card are out of alignment. Not all mispunched card columns are detectable. 
The DSR detects all invalid binary punches. Mispunched USASCII characters 
that are not detected as errors are converted to valid USASCII characters. 


3.8.6.3 END OF FILE RECORDS. Acard witha slash-asterisk (/*) in 
the first two columns represents an end of file record in both Binary and 


USASCII modes. 


3.8.7 DUMMY DEVICE 


The dummy device handles all possible operations. All necessary system 
set flags are returned. For example, read operations set the end of file bit. 
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| Table 3-9. USASCII Character Internal Code 
to Hollerith Code Conversion 


USASCII Hollerith Charact USASCII Hollerith Ch 
Code Code ey Code Code aEectes 


“No Punches 
12-8-7 


— 


8°7 : de 
8°3 # 12 
11-3-3 $ 12. 
0-8-4 % 12. 
EZ & iz. 
8*5 12 
12°85 ( 12s 
11-8-5 ) V2 
11-8-4 * 11 
12°8*6 + 1] 
0-8 +3 ; 1l 
11 11 
12+8 +3 Lt 
0-1 11 


© 


— 
_ 
Bi oe a 


/ 
0 
] 1 ll 
Z z TEs 
3 3 0 
4 4 0 
5 5 0 
6 6 0 
7 7 0 
8 8 0 
9 9 0 
8-2 : 0 
11-8°6 : bz 
12°8+4 < 0. 
8- = 11 
0 > ll. { 
0: wz 0 — 


3.8.8 16INPUT/16 OUTPUT DATA MODULE 


This DSR does not support interrupt processing. The 16 I/O Data Module is 
not compatible with any other I/O device, and has its own functions and op- 

i codes. They are listed in table 3-11.’ Figure 3-2 illustrates the Data Module 
PRB. 
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Table 3-10. Binary Character Internal Code 
to Binary Gard Code Conversion 


Internal Code Card Code Internal Code Card Code 


Most Least 
Significant Rows Significant Rows 
Digit 12-11-0-9 Digit 8-1-2-3-4-5-6-7 


oO 
— 
a) 
Ho} 
x 


Blank 

9 

0 

0-9 

11 

11-9 
11-0 
11-0-9 
12 

12-9 
12-0 
12-0-9 
12-11 
12-11-9 
12-11-0 
12-11-0-9 


HrHUNOWDrPoOoW~INDUAWNHO 
HHOOWrPOMIDUAWNKO 
DODD MDDADAIRDANAWNH 


Example: The binary card character for hexadecimal CA is 


12-11-8-2. 


3.8.9 AD/DA DEVICES 

Figures 3-3 and 3-4 illustrate the PRB for Analog-to-Digital converters and 
Digital-to-Analog converters, respectively. 

3.8.10 MAGNETIC TAPE 


The TI Model 979 Magnetic Tape Unit is a standard peripheral of the mini- 
mum DX980 hardware configuration. 


This unit is a 1/2 inch, 9 track, IBM compatible format, 800 bits per inch 
tape drive. It uses an NRZI recording format with a standard fixed speed of 
37 1/2 inches per second. 


A detailed description of the unit is contained in the Model 979 Tape Trans- 
port Operators Manual, part number 216316-9701. 
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| Table 3-11. 16 1/O Data Module Instructions 


Reset - Initialize Data Module logic. 


Output Word - Transfers a word from computer to Data 
Module. . 


Output Bit - Transfers a single bit from computer to a 
specified bit of the Data Module. 


Read Status - Transfers current Data Module status to 
computer. 


Read Data - Transfers a word from Data Module input 
lines to computer. 


Read Output Register - Transfers the contents of the 
Data Module Output lines to the computer. 


Open - Initialize the Data Module and set-up PRB. 


Close - Terminate I/O operations. 


0 7 


SYSTEM SET FLAGS 


8 15 
USER SET FLAGS 


Figure 3-2. Data Module PRB 


WORD 1! 


WORD 2 


(A)129984 
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OPERATION DEFINITION 


WORD 3 TABLE (ODT) ADDRESS 


ODT FOR A/D 15 


WORD 0 DEVICE ADDRESS (2) 


WORD 1 CHANNEL 


WORD 2 


RETURNED CONVERTER INPUT 


(A)129985 


NOTES: 
(1) OPERATION CODES, 


14;6= A/D CONVERSION 
14 REQUESTED 


O7, 6 OPEN 


09, 67 CLOSE 


@) THE DEVICE ADDRESS RANGE 
IS 0-63 AND IS SELECTED BY 
SWITCHES INSIDE THE A/D 
CONVERTER ASSEMBLY, 


G@) GAIN ONLY APPLIES TO 7480/20 


OR 7480/22 


Figure 3-3, Analog-to-Digital Converter PRB 


WORD 2 ZEROS 


WORD 3 


0 ODT FOR D/A 


WORD 0O DEVICE ADDRESS 


WORD 1 DATA OUTPUT WORD 
| 7/8 
WORD 2 CHANNEL 
(A)129986 


OPERATION DEFINITION 
TABLE (ODT) ADDRESS 


NOTES, 


@). OPERATION CODES 


13, 6=D/A OPERATION 
13 REQUESTED 


O07 16> OPEN 


09 16> CLOSE 


6 


Figure 3-4. Digital-to-Analog Converter PRB 
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SECTION IV 
DISC FILE MANAGEMENT 


4,1 FILE STRUCTURES 


A DX980 file is a logical collection of related data stored on a random access 
device. A file consists of a number of logical records each containing a col- 
lection of related data items that the program treats as a unit. Logical rec- 
ords may also combine to form a physical record. A physical record is a 
collection of data items that the operating system treats as a unit when trans- 
ferring data between main memory and the random access device. DX980 
supports two types of record transfers: blocked and unblocked. An unblocked 
file exists if each physical record in the file consists of a single logical rec- 
ord. If the physical records contain more than one logical record, the file 

is described as blocked. 


4,2 FILE HANDLING 


When the program issues an I/O call fora file transfer, the file management 
system intercepts the call. For output operations, the logical record indi- 
cated by the Physical Record Block (PRB) is transferred to a physical rec- 
ord buffer. if the logical record transfer completes the physicai record, the 
physical record is transferred to the random access device. Similarly for 
input operations, a physical record may be transferred from the device to 
the buffer. The buffer then supplies logical records to the program until all 
logical records are used. At that time a new physical record is retrieved 
from the device. Thus, several logical record transfers can be made at 
memory speed before a single transfer at peripheral speed. This arrange- 
ment can minimize transfer time in programs with a high degree of I/O ac- 
tivity. 


4,2.1 MEMORY, ALLOCATION 


The operating system allocates memory space for physical record buffers 
from the user program's job extension area (<jearea>) when the user opens 
a file. The memory space is released when the user closes the file. The 
Job Control Language (JCL) tells the system that a file is blocked and the 
number of physical record buffers to be allocated. The job area (<jarea>) 
for the user program provides memory space for logical record buffers. 
The user can provide this space explicitly by using a Block Starting with 
Symbol (BSS) directive in an assembly language program or implicitly with- 
in the Fortran Input/Output package when the program is run. 
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4.2.2 FILE INTEGRITY 


DX980 maintains file integrity through access restriction and through file 
locking. When the file is defined or assigned, the user specifies access re.- 
strictions for operations on the file of reading, writing, executing and de- 
leting the file. He can restrict access completely for any of the operations 
(NONE), he can allow access to anyone (ANY), or he can selectively restrict 
access to either the creator of the file (CREAT) or to those having the proper 
password (PSWD). Following this initial definition of access restrictions, 
DX980 enforces them for each type of file operation. 


In addition, DX980 provides three levels of file locking: 
1. Assigned exclusive 
2. Assigned shared - open exclusive 
3. Assigned shared - open shared, then lock 


The first type provides an exclusive access to the file until the file is deas- 
signed through job step termination if the file is not being passed, or through 
job string termination if the file is passed from one step to another. Ex. 
clusive access can also be removed through runtime resource deallocation. 
The second type of file locking provides exclusive access to the file until the 
file is closed. The third type of file lock secures the file on an operation by 
operation basis. The file is locked by setting a bit in the User Set Flag area 
of the PRB for that operation. This type of lock secures the entire file 
rather than a single record. Also, the user is not locked out unless he spe- 
cifies the lock by setting the bit in the PRB. 


4.3 DISC ORGANIZATION 


The operating system allocates file space and maintains disc directories to 
support both DS330 and moving head discs. DX980 uses two levels of direc- 
tories: 


e one master file directory for each disc pack (<volume>) 
e a user file directory for each user «fileid>) on each disc 


These directories are standard indexed files with a physical record size of 
96 words. For a single master file directory, this indexed file contains 
keyed entries consisting of file control blocks for each user file directory. 
The file control blocks are keyed on each valid user <fileid> in the system. 
A particular user file directory contains keyed entries consisting of file con- 
trol blocks for each file defined under the user. The file control blocks are 
keyed on the file name <filenam>. 


Each user file directory identifies files by file name (<filnam>). Thus, a 
user can have several files under a particular user file directory on each 
disc volume. If an installation has a single disc drive, all packs to be 
mounted on that drive must also contain the operating system. For multiple 
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drive installations one drive, designated as the system disc, supplies the op- 
erating system plus user files. The remaining drives are dedicated complete- 
ly to user files. The selection of the drive or volume for file storage is a 
JCL assignment parameter. 


The operating system employs two techniques for file allocation: contiguous 
allocation and noncontiguous allocation. Contiguous allocation places the en- 
tire file on consecutive disc tracks (disc tracks are numbered consecutively 
from 0 through the total number of tracks on the disc; the last track on one 
disc cylinder and the first track on the next cylinder are numbered consecu- 
tively on a moving head disc). Noncontiguous allocation is accomplished 
dynamically as the file grows on a track-by-track basis. The initial alloca- 
tion for noncontiguous files is specified as a JCL parameter and may be any 
number of tracks. The entire initial allocation is assigned to consecutive 
tracks. AsI1/O operations add records to the file and the initial allocation 
is used up, additional tracks are allocated one at a time from any available 
disc space. As each additional track is used up, another is added until the 
final allocation limit, specified in JCLas<mtrks>, is reached. The file 
management system can also start searching for the initial allocation quan- 
tity (or total quantity for contiguous allocation) at a particular track 
<trknum>. This user option minimizes head movement by grouping together 
files to be processed by a program. 


4.4 FILE TYPES 


DX980 supports three types of files: linked sequential, relative record and 
key indexed files. The following paragraphs explain each of these file types. 


Table 4-1 summarizes the features of each file type. 


4,4,1 LINKED SEQUE 


Linked sequential files are files whose records can only be reached through 
sequential access. File allocation is noncontiguous. The operations sup- 
ported on a Linked Sequential File are identical to those outlined in Section 
III for I/O to sequential devices. A linked sequential file supports an im- 
bedded end of file so that a single linked sequential file can replace a multiple 
file stack on a sequential access device (for example an entire reel of mag - 
netic tape). The random access capabilities of the disc facilitate the search 
file operations. A record cannot be inserted between two existing records. 
Individual records cannot be deleted. An end of medium pointer always fol- 
lows the last write performed. This end of medium is equivalent to an end 
of volume on a tape reel. 
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Table 4-1. Summary of DX980 File Features 


File Type 


Linked 
Sequential 


Parameter 


Relative 
Record 


Key Indexed 


Access Sequential Sequential; Sequential; 
Random Random 

Allocation Noncontiguous Contiguous Noncontiguous 

Logical Order Chronological Disc Address Keyed; alphabetic 


Nonkeyed; Chron- 
ological after key 


15-bit Binary 1-30 byte 
record number 


Direct (LR = PR) | Blocked 
Blocked (LR<PR) 


Key None 


Blocked 


Transfer 


Physical Record | Multiple of 32 Multiple of 32 Multiple of 32 
Length 

Logical Record Variable Fixed Variable 

Length 

Logical/Physi- LR§ PR LR <PR LR < PR-8 unkey- 
cal Record Re- ed; LR < PR-8- 


lationship KEY keyed where 


KE Y=key 
Logical Record No No 
Split Over Phy- 
sical Record 
Boundary 
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The logical record length for linked sequential files is always variable. 
Therefore word 2 of the PRB specifies the record length of each individual 
record when the record is written. When a record is read, the actual record 
length is returned in word 2 of the PRB subject to the maximum record length 
specified when the file was opened. Insofar as the I/O program is concerned, 
the physical record length of records stored on disc is transparent. If the 
physical record length is greater than logical record length, the number of 
actual disc transfers is less than the number of I/O calls. If the physical 
record length is less than the logical record length, the number of disc trans- 
fers will be greater than the number of I/O calls. Figure 4-1 illustrates the 
composition of a linked sequential file. 


Change 1 4-4 Digital Systems Division 


943005-9701 


LINK SEQ, BUFFER 


WRITE 
FLAG 


‘WRITE. VERIFY 
FLAG 
‘BUFFER FULL FLAG 


“UNUSED 


LOGICAL RECORD STRUCTURE 


DATA/EOF 
FLAG READ DISC ADDRESS 7] 
\ OF PHYS, REC, 
CONTIGUOUS 
FLAG 


“FORWARD TRACK 
POINTER 


INDEX TO END +1 
OF LAST RECORD 
IN BUFFER 


NO, OF DATA 
BYTES=r 


NDATA BYTES 


PHYSICAL. RECORD 
DATA TRANSFER 
O/FROM STORAGE 
SERVICE 
(SIZE= <«PRWRDS) WORDS) 


PARTIAL LR 


PHYSICAL RECORD 
BOUNDARY 


NDATA BYTES 


EOF RECORD STRUCTURE 


BACK EOF POINTER 
(O FOR FIRST EOF) 


BACK EOF INDEX 


FORWARD EOF 
POINTER 
O FOR LAST EOF 


FORWARD EOF INDEX 


16 BITS 


(A)130321A 


Figure 4-1. Linked Sequential File Parameters 
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4.4.2 RELATIVE RECORD FILES 


A relative record file allows random access in addition to sequential access 
for locating records within the file. The random access method uses a num- 
ber to directly specify the numerical position of the record within the file. 
The first record is designated as record number 0. Records may be added 
to the file using either access method. Existing records in the file may be 
changed or read using either access method. A record cannot be inserted 
between two existing records. Single records cannot be deleted. The oper- 
ating system does not support an end of file interior to the file. 


File allocation for a relative record file is contiguous so that the size of the 
file must be specified when the file is defined. The entire contiguous data 
area assigned to the file is partitioned into fixed length logical records. If 
blocking is specified, the blocking buffer length (physical record length) 
must be larger than the logical record length. In either case access toa 
record does not require a directory search. A maximum of one disc access 
is required to fetch a record by either method and may be none if the record 
is within a blocked physical record that is in the buffer. 


A relative record file is unblocked if the logical record length is equal to 
physical record length. For unblocked files the file management system does 
not create an intermediate buffer in the job extension area. Instead, it trans- 
fers the data directly to or from the logical record buffer specified by the 
PRB. This direct transfer requires a disc transfer for each I/O call, and 
increases the running time of the accessing program, but reduces the mem- 
ory requirements due to a smaller job extension area. Figure 4-2 illustrates 
both blocked and unblocked transfers. 


The operating system supports the following random access functions: 


e Write/Replace using key - Data record with same numeric key to be 
replaced with new data record. 


e Replace using key - same as Write/Replace using key. 
e Read using key - Read the logical record as specified by the key. 


Any access to a record in the file (read or write, random or sequential meth- 
od) establishes a logical position that follows the record previously accessed. 
This logical position has no effect on a subsequent random access operation, 
but defines the location for a subsequent sequential operation. 


4.4.3 KEY INDEXED FILES 


A key indexed file allows random access in addition to sequential access for 
locating records within the file. The operations allowed for both random and 
sequential access methods are considerably more powerful than those allowed 
for either linked sequential or relative record files. Key indexed files are 
noncontiguous. 
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Figure 4-2. Relative Record File Transfers 
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The key for random access within a key indexed file is an n-byte name 

(n<30 USASCII bytes or binary bytes). The number of bytes in the key is 
fixed for all keyed records in the file when the file is defined. However, dif - 
ferent key indexed files may have different key sizes. Keyed records are | 
added by setting a bit in the PRB (random access method). Records without 
a key are added sequentially to the file. Records that are placed sequentially 
in the file without a key can only be retrieved with the sequential access meth- 
od. No two records may have the same key (name). Most of the sequential 
access capabilities of key indexed files are identical to those described in 
Section III for sequential 1/O devices. Insertion of a nonkeyed record is also 
allowed. 


4.4.3.1 RANDOM ACCESS FUNCTIONS, The operating system supports 
the following random access functions: 


e Read using key - With option to delete record and key. 
e Write insert using key - Presence of same key considered error. 


e Write replace/add using key - Data record with same key to be 
replaced with new data record. 


e Delete at record level - keyed and non-keyed records. 


e Read next higher or lower key. 


4.4.3.2 SEQUENTIAL ACCESS FUNCTIONS. When performing a sequen- 
tial access read within a key indexed file, logical records are retrieved in 
increasing order of key with the key treated as an unsigned integer (the order 
is alphabetical if the key is USASCII bytes). Unnamed records are positioned 
in the file as sequential records following either a keyed record or the be- 
ginning of file. Any access to a record in the file (read or write, random 
or sequential method) establishes a logical position that follows the accessed 
record. This logical position has no effect on a subsequent random access 
operation, but defines the location for a subsequent sequential access opera- 
tion. 


4.4.3.3 LIBRARY MANAGEMENT. Libraries consisting of groups of log- 
ical records identified with a common name are easily maintained through a 
combination of keyed and nonkeyed records in the same file. For example, 

a source program library could be written with a keyed record for the first 
source record. The remaining records in the program would be nonkeyed, 
sequential records. To retrieve a program, the system first performs a read 
using key to locate the start of the program. Subsequent sequential read op- 
erations retrieve the remaining records. The Key Recovery Desired bit in 
the PRB (word 1, bit 2) must be set during this operation so that the first 
time a key is returned, the system recognizes the corresponding record as 
the first record of the next program. This indication can be treated as an 
end-of-file if only one program is desired. If the program is the last in the 
file, the EOF flag (PRB word 0, bit 2) denotes end-of -file. 


a 
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4.4.3.4 MULTIPLE RECORDS WITH THE SAME KEY. If the operating 
system detects an existing identical key within the file while performing a 
write using key operation, it returns a logical error indication to PRB word 
0, bit 6. The user can still make an entry using that key, however. By per- 
forming a read using key operation to locate the key within the file, and then 
performing a sequential write without key at that location, the new record 
can be inserted at the beginning of a sequential string following the record 
with the target key. This operation generates a string of records for each 
key that operates so that the last record inserted will become the first rec- 


ord obtained sequentially following the keyed record itself. 


4.4.3.5 BUFFER MANAGEMENT. A system wide buffering scheme pro- 
vides buffer management for key indexed files. A major factor in gaining 
access to a key-controlled data record is the number of disc accesses re- 
quired to search through the key structure. To minimize the number of ac- 
cesses and reduce search time, DX980 allows multiple memory buffers for 
storing keyed records. The minimum number of buffers per job for key 
indexed files is two: one buffer for keys and another for data. The operat- 
ing system provides two mechanisms for acquiring multiple buffers. The 
"BUFFERS=" parameter in the assignment command specifies the number 
of buffers to be allocated in the accessing program's job extension area. 


In addition if multiple programs are sharing a key indexed file, the buffers 
from all sharing programs are grouped together for searching purposes. 
The user should specify a sufficient number of buffers in his job extension 
area to achieve the access time required for the application. If the file is 
being shared, the access time will be less than anticipated. 


4.4.3.6 BUFFER SIZE. Buffer size selection for key indexed files is 
based on the length of each key, the number of keyed records in the file, and 
the desired data access time. Access time for data records is approximately 
equal to the number of disc accesses required to find and retrieve the record, 
times the average seek time for the disc drive. The number of disc accesses 
to get a data record is approximately equal to log, ntl, where nis the num- 
ber of data records in the file and m is the number of keys in each physical 
record. The number of keys per physical record is equal to the physical 
record length minus four divided by the effective length of each key. The 
effective key length, including pointers and information about the data record, 
is five words plus the key length in words. Since key length is specified in 
characters in the JCL, the key length in words is the JCL specification di- 
vided by two and rounded up. The minimum buffer size specification must 
provide for two keys and at least one logical record: 14 words + 2* (key 
length/2). In addition the buffer size must be a multiple of 32 words. 

Figure 4-3 illustrates the file structure for key indexed files. The terms 
used in the figure are defined in the following paragraphs. The structure is 
handled by DX980 rather than the user. The information is supplied for in- 
creased comprehension only. 
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Figure 4-3. Key Index File Parameters 
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4.4.3.7 LOGICAL RECORD. The logical records include both data and 
control fields for operating system use. The control area of the record is 
comprised of the following fields: 


@ Forward Pointer Address (FPA) - This two word space in each log- 
ical record contains the disc address of the physical record contain- 
ing the next logical record in a linked file. 


e Forward Pointer Index (F PI) - This one word area in the logical rec- 
ard Sanat +h 44 nn antin Pm 


ora designates the relative po sition of the next logical recor ra within 


the physical record specified by FPA. 


e Backward Pointer Address (BPA) - This two word space in each log- 
ical record contains the disc address of the physical record contain- 
ing the previous logical record in a linked file. 


e Backward Pointer Index (BPI) - This one word area in the logical 
record designates the position of the next logical record within the 
physical record specified by BPA. 


e Key Flag - The operating system sets this bit to indicate that the 
logical record has a key associated with it. 


e Delete Flag - The operating system sets this bit to indicate that 
the logical record has been deleted from the file. 


® Text Count - This field indicates the number of bytes contained 
in the data (text) field of the logical record. 


@ Key - If the Key Flag is set, this field contains the key for the log- 
ical record. 


4,4,3.8 DATA PACKAGE BUFFER. The data package buffer contains log- 
ical records and a track pointer that comprise the physical record stored on 
the disc, plus control information used by the operating system. The num- 
ber of buffers allocated in a particular job is specified by the user through 


the <nbufs> parameter in JCL. 


Track Pointer. The track pointer becomes part of the physical record on 
the disc. If the record is the last record onatrack, it points to the address 
of the track containing the next physical record of the file. For the first 
physical record on a track, this field is used for a pointer to the previous 
track of the file. For interim records ona track, this field is not used. 


Data Package Control. The controi area of the buffer is comprised of 
ee 
the following fields: 


® User Buffer Pointer - This field contains the main memory address 
of the first buffer assigned to the current user of the buffer. 
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e Forward Pointer (FP) - This one word field contains the main mem- 
ory address of the next buffer in a series of buffers assigned to a 
job. 

® Backward Pointer (BP) - This one word field contains the main mem- 
ory address of the previous buffer in a series of buffers assigned to a 
job. 

e Write Flag - When a user alters the information contained in a file 


buffer, the Write Flag sets. When set, this flag indicates to the op- 
erating system that the physical record must be written back to the 
disc before it is discarded after being used. This flag ensures that 
the changed data will be recorded in place of the old data on the disc. 


® Write Verify Flag - When set, this flag indicates that the operating 
system must read data back from the disc following a write to ensure 
that the record was stored accurately. 


e Busy Count - This field contains the number of users that are cur- 
rently using the buffer. When the count equals zero, the system can 
replace the buffer contents with new information. 


e Real Disc Address (RDA) - This two word field contains the disc ad- 
dress of the physical record currently in the buffer. 


4.4.3.9 KEY DIRECTORY BUFFER. The key directory buffer is identical 
to the data package buffer, except that the logical record fields of the data 
package buffer are replaced with nodes of the sorting tree used to locate a 
particular key. Each node contains one control word that specifies if the 
node is a bottom node or an intermediate node, and that also indicates the 
number of keys contained in the node. The remainder of the node contains 
key packages, and if it is an intermediate node, pointers to the next lower 
level node in the sorting tree. 


Lower Level Pointers. If the desired key is not contained in a current node, 
the operating system must access another block of keys (node) to locate the 
key. The system searches the current node until it finds the first key that 

is logically greater than (alphabetically past) the desired key. Associated 
with each key is a two word pointer. The pointer is the disc address of the 
node that contains keys in the level of the sorting tree below the associated 
key. The operating system uses that pointer to access the next node for the 
search. All of the keys in next lower level node are sorted and are alpha - 
betically between the surrounding keys at the higher level. 


Key Package. The key package consists of the following fields: 


@ Delete Flag - The operating system sets this bit to indicate that the 
key and its associated logical record have been deleted from the file. 


Sennen 
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e Data Pointer - This 24-bit field contains the disc address of the 
physical record that contains the logical record associated with the 
key. 


e Index - This one-word field designates the position of the correct 
logical record within the physical record indicated by the data 
pointer. . 


e Key - This field contains a name that is from 1 to 30 bytes long and 
that identifies the logical record within the file. This key is re- 
peated in the control field of the logical record associated 
with the key. _ 


4.4.4 FILE ERRORS 


As with I/O devices, three levels of errors can result from a SVC to per- 
form file I/O. The conventions described in Section III for I/O errors apply 
to file errors also. Table 4-2 lists the possible file errors together with 
their associated severity and error number. 


4.5 PHYSICAL RECORD BLOCK 


The Physical Record Block (PRB) for file 1/O is similar to that for device 
I/O as outlined in Section III except for the key address field (word 4). The 
PRB is four words in length unless bit 1 of word 2is set. That bit indicates 
the presence of the key address in a fifth word. Key address is used by key 
indexed or relative record files. The field points to the memory address in 
the user program where the key can be located. For relative record files the 
indicated key contains a 15-bit binary value within the range of 0 to 32, 767. 
Bit 0 of this word must be zero and bits 1 through 15 contain the record 
number. This number indicates:-the logical record number within the partic- 
ular relative record file. For key indexed files the key contains a block of 
from 1 to I5 words (1 to 30 bytes) that functions as an alphanumeric byte 
string or a binary number. The length of this block (key) is specified with 
JCL. The key constitutes the name of the referenced logical record. Keyed 
reads and writes require both a key and a logical data record pointer. Table 
3-4 outlines the opcodes that are applicable to I/O for relative record and key 
indexed files. Linked Sequential Files are accessed with I/O calls as de- 
scribed in Section III. 
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Table 4-2. File Errors 
Error : 


No space available on disc volume 


Severe 


File full. File status: can only be accessed for 
reading. No additional records can be written into 
the file, not even following a rewind operation. To 
reuse the disc space the file must be replaced. 


Severe 


Attempted write, logical record greater than 
physical record 


Logical 


Severe Hardware failure on disc volume 


Key indexed file - replace attempted on non- 
existent key 


Logical 


Logical Key indexed file - write attempted on existing key 


Key indexed file - write/replace (op code 101) 
attempted without specifying key. 


Logical 


Key indexed file - replace (op code 102) attempted 
on a keyed record without specifying key. 


Logical 


Key indexed file - replace (op code 102) attempted 
’ when file was positioned at EOF. 


Logical 


Key indexed and relative record files - no key 
match in the file 


Logical 
Severe Insufficient tracks available for allocation 
Severe Insufficient contiguous tracks left for allocation 
Severe Allocation exceeds disc volume capacity 


Unable to allocate buffers, job extension area too 
small 


Severe 


Insufficient number of buffers for attempted oper- 
ation 


Severe | 


Fatal Opcode is either non-existent or illegal 


Severe Access violation for integrity code 


i 
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Operation 


Write 


W rite / Perform a replace operation. 


Replace 


disc, 


a) 


Table 4-3, Relative Record and Key Indexed File Management Opcodes 


Fatal error - Must use Replace (102) or Write/Replace (101) 
Write a logical record from the user's buffer to disc. 


1) Key specified: 


2) Key not specified: Insert the nonkeyed record where the file 
pointer is positioned; advance pointer. 


1) Key Specified: Replace the logical record of the specified key 
with the logical record from the user's buffer. Position file 
pointer for next sequential record. 


2) Key not specified: Replace the record where the file pointer is 
positioned and advance the file pointer. 


Unconditionally write the logical record from the user's buffer to the 


1) Key specified: 


Function 


If the specified key already exists in the file, do not write 
the logical record to disc. Return logical error status to 
the user, and do not reposition file pointer. 


If the specified key does not exist, make a key-directory 
entry for the key and write the logical record to disc under 
the new key entry. Position file pointer beyond completed 
write. 


If the specified key exists in the key-directory, replace the 
logical record associated with the key with the logical rec- 
ord from the user's buffer. Position file pointer to next 
sequential record. 
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Table 4-3. Relative Record and Key Indexed File Management Opcodes (Continued) 


1/O : Fi 
/ Operation sa Function 


Code Type 


b) If the specified key does not exist, make a key-directory 
entry for it, and write the logical record to disc under the 
new key entry. Position file pointer to next sequential rec- 
ord. 


2) Key not specified: Return anerror status (number 239) to the 
user. Do not reposition file pointer. 


Replace Replace the logical record on the disc with the logical record from 
the user's buffer. 

1) Key specified: Replace the record specified by the key and posi- 
tion file pointer to next sequential records. 

2) Key not specified: Replace record where the file pointer is 
positioned and advance the pointer. 

Replace the logical record on the disc with the logical record from 

the user's buffer. 

1) Key specified: Replace the record specified by the key and posi- 
tion file pointer to next sequential record. If key does not exist, 
return error and do not reposition file pointer. 

2) Key not specified: Replace record indicated by file pointer and 
advance pointer. If record to be replaced has a key, then return 
a logical error (number 240 or 241). Do not reposition file pointer. 

Read Read the logical record from the disc into the buffer specified by the 


user. 


1) Key Specified: Transfer logical record associated with specified 
key and position pointer to next sequential record. 
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Table 4-3. Relative Record and Key Indexed File Management Opcodes (Continued) 


File 


Operation Tbe 


Function 


2) Key not specified: Read record indicated by the file pointer and 
advance pointer. 


T0L6-SO0Er6 


Read the logical record from the disc into the user's buffer. 
1) Key Specified: 


a) Read the logical record as specified by the key from the 
disc into the user's buffer. Position file pointer to next 
sequential record. 


b) If the specified key is not in the key-directory, return an 
error status to the user. Do not change file pointer. 


2) Key not specified: 


a) Read the record indicated by the file pointer and advance 
pointer. 


b) If a keyed record is encountered and the PRB specifies that 
key recovery is desired, return the key to the user in the 
area allocated for the key. If key recovery is not desired, 
do not return the key. 


3) No data desired: By setting the 'return record size only" bit in 
the PRB a user can issue a Read and no logical record data is 
transferred. The size of the logical record is returned in the 
Data Record Length field of the PRB. Functions 1 and 2 above 
apply. 
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Table 4.3. 


Relative Record and Key Indexed File Management Opcodes (Continued) 


vo Operation a Functi 
Code Bogs Type unction 


Read High 


1) 


2) 


Fatal error 


Read the logical record from the disc into the user's buffer. 


Key Specified: 


a) 


b) 


c) 


If the exact specified key exists in the key-directory, read 
the logical record associated with it. Position pointer to 
next sequential record. 


If the specified key does not exist, find the next algebraically 
higher key in the key-directory and read the logical record 
associated with it. Return the key that was actually found to 
the key field addressed by word 4 of the PRB. Position the 
pointer to next sequential record beyond retrieved record. 


If the specified key does not exist and no algebraically higher 
key exists in the key-directory, return an error status (end 
of medium) to the user. Do not reposition pointer. 


Key not specified: Use the forward sequential-access method to 
find the next key in the key-directory beyond the record indicated 
by the file pointer. 


a) 


b) 


Return the key to the user if a keyed record is found and if 
the key recovery bit is set in the PRB. Put the associated 
logical record in the user's buffer. Position file pointer to 
next sequential record. 


If no keyed record is found, return an error status (end of 
medium) to the user. Position pointer past last data record 
in file. 
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Table 4.3. 


Operation 


Read Low 


Realtive Record and Key Indexed File Management Opcodes (Continued) 


1) 


Fatal error 


Read thelogical record from the disc into the user's buffer. 


_— SN eR A 


Function 


a a ee Len 


Key Specified: 


a) If the specified key exists in the key -directory, read the 
logical record associated with it. Position pointer to next 
sequential record. 


b) If the specified key does not exist, find the next algebrai- 
cally lower key in the key-directory and read the logical 
record associated with it. Return the key that was actually 
found to the key field addressed by word 4 of the PRB. Posi- 
tion pointer to next sequential record. 


c) If the specific key does not exist, and no algebraically 
lower key entries are in the key-directory, return an error 
(beginning of medium) status to the user. Do not change 
file pointer. 


Key not svecified: Use the sequential access method to find the 
next key in the key-directory going backwards from the current 
file pointer position. 


a) Ifa keyed record is found, return the key to the user (if the 
key recovery bit is set in the PRB) and put the associated 
logical record in the user's buffer (if data is to be trans- 
ferred). Position file pointer to record following the record 
used. 
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Table 4-3. 


J 
tO Operation Bie Function 
Code Type 


Read 
Delete 


Delete 


Relative Record and Key Indexed File Management Opcodes (Continued) 


If no keyed record is found, return an error (beginning of 
medium) status to the user. Position file pointer to be- 
ginning of file. 


Fatal error 


Read the logical record associated with the specified key into the 
user's buffer. Then mark both the key entry in the key-directory 
and its associated logical record as deleted. Same rules apply as 
for Read (I/O code 103) plus Delete (I/O code 107) for K.1,. files. 


Fatal error 
Mark the indicated record as deleted. 
1) Key specified: | 


a) If the key exists, mark the specified key entry in the key- 
directory and its associated logical record as deleted. Any 
sequentially linked record(s) that exist for the specified key 
remain, but the associated key and its record are specif- 
ically marked as deleted. Position pointer to next record. 


b) If the specified key entry does not exist in the key-directory, 
return an error status to the user. Do not change file 
pointer. 


2) Key not specified: 


a) Mark the logical record at the current file pointer position 
as deleted. Increment the pointer to the next logical rec- 
ord. If the deleted record has a key, delete that key from 
the key-directory. 
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Table 4-3. Relative Record and Key Indexed File Management Opcodes (Continued) 


Se a 


Operation Function 


b) If the key recovery bit is set in the PRB and the next logi- 
cal record contains a key, then return the deleted key to the 
user in the key field of the PRB. 


c) When the last logical record is deleted, the file pointer is 
incremented to point at the end of medium. Therefore, the 
appropriate status is returned to the user. 


Delete 
Sequentially 


Fatal error 


Mark the specified key entry, its associated logical record(s), and 
any sequentially linked logical record(s) up to, but not including, the 
next algebraically successive key entry as deleted. 


1) Key Specified: 


a) If the key entry exists in the key-directory, mark it and any 
sequentially linked logical record(s) as deleted. If the key 
recovery bit is set, the next successive key is returned to 
the key field of the PRB. Position file pointer beyond de- 
leted records. 


b) If the key entry does not exist in the key-directory, return 
an error status to the user. Do not change file pointer. 


2) Key not specified: 


a) Begin at the current file pointer position and mark the se- 
quentially linked logical record(s) up to, but not including, 
the next successive key entry as deleted. Position the 
file pointer beyond deleted records. 
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Table 4.3. Relative Record and Key Indexed File Management Opcodes (Continued) 


Fil 
Operation ae Function 
Type 


If the key recovery bit is set, return the next successive key 
to the user in the key field addressed by PRB Word 4. 


c) If an end of medium is detected, return the appropriate sta- 


tus to the user. 


Delete Fatal error 


es Mark all key-directory entries (key and non-key) and all logical data 


records in the file as deleted (delete all data contents of file to create 
an empty file). File allocation remains the same. 
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SECTION V 
SUPERVISOR CALLS 


5.1 GENERAL 


DX980 supervisor calls (SVC) are requests to the operating system to per- 
form a service for the user. This request is the only communication between 
a user program and the operating system. The computer interprets an SVC 
as an illegal machine instruction. When the computer encounters an illegal 
instruction, it automatically branches (traps) to the internal interrupt entry 
address. The operating system examines all instructions that cause a trap 
to determine if they are SVC opcodes. If not, the instruction actually is 
illegal and the system aborts the offending program. If the instruction is an 
SVC, the operating system decodes the remainder of the instruction and calls 
the appropriate system service routine to process the SVC. 


For compatibility with the Basic Monitor System, DX980 recognizes two SVC 
instruction formats: C380 and F800. The C380 SVCs conform to SVCs for 
the Basic Monitor. However, the Basic Monitor call Set Control Status Flag 


(C384) is not recognized by DX980. The Basic System Use and Operation 


manual referenced in the preface to this manual explains Basic Monitor SVCs. 


The standard DX980 SVC format is based on instructions in the form: F8XX 
(XX corresponds to the hexadecimal equivalent of the SVC number as de- 
scribed in this manual). To issue an F8XX SVC, construct an argument list 
that contains a word identifying the number of arguments described by the 
list, followed by successive words containing the addresses of each argu- 
ment. Then set the M register to the address of the list and allow the pro- 
gram to execute the SVC. For example, a Wait for 1/O SVC is implemented 
as follows: 


@GLDM = ARGLST 
DATA >F82B (2B16 = 43105 Specifies SVC 43) 


ARGLST DATA 1,PRB Designates 1 Argument at Address PRB. 


Supervisor calls can be specified in decimal form if the OPD (Operation De- 
finition) assembler directive is first used to define a new instruction mne- 
monic, SVC, that maps the decimal number to its hexadecimal equivalent. 
Then the statements: 


SVC 43 
and 
DATA >F82B 


are equivalent. 
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Table 5-1 summarizes the DX980 SVC. Table 5-2 lists and describes each 
SVC. The remaining paragraphs in this section provide examples of param- 
eter setup and calling sequences for each SVC, plus a rnore detailed descrip- 
tion. 


Table 5-1. DX980 User Supervisor Calls 


Base Ten manction 
SVC Number cara 


0 Input/Output 


Terminate Job 

Set Floating Point Address 
Get Memory Limits 
Terminate Job Abnormally 
Terminate Task 

Delete Task 

Suspend Task 

Post Event 

Get Time and Date 

Create Task 

Load 

Load and Relocate 


Command Scanner 


Wait for Input/Output 


Allocate Resource 
Deallocate Resource 
Get Program Limits 


Start Job 
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Base Ten 
SVG Number 


Table 5-2. 


Function 


I/O 
Terminate Job 


Set Floating Point 
Address 


Get Memory Limits 


Terminate Job 
Abnormally 


Terminate Task 


Delete Task 


Suspend Task 


Post Event 


Number of 
Arguments, 


Name(s) 
1, PRB 
0 
1, FLT980 


1, ARRAY 


1/2, ERRCOD, 


ERRID 
0 
1, TASKID 
1/2, WCL, 
RETEDB 


DX980 Supervisor Call Description 


Description 


nn eS ANE ELS NO 


Performs all I/O for the user as specified by 
the PRB. 
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Normal Job Termination 


Set floating point address to trap to for any 
floating point instructions. 


Get memory limits of user partition from job 
partition and return values in the supplied 
array. 


Abnormal Job Termination. Number of argu- 
ments is either 1 or 2. First argument is 
ERRCOD, an error code supplied by the user 
(should be 1000 or greater). Second optional 
argument is ERRID, the address of a 6 char- 
acter identifier that the user supplies to identi- 
fy which error the ERRCOD applies to. 


Normal Termination of the Running Task. 


Delete all tasks under the user job having the 
same name as TASKID. 


Suspend the running task under the user job 
waiting for event(s) as specified by the Wait 
Criteria List (WCL). RETEDB is optional; if 
specified, the task returns to the last matched 
Event Description Block (EDB) on which the 
match occurred. 

Post the event specified in the EDB. 
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Table 5-2. DX980 Supervisor Call Description (Continued) 


Number of 
Arguments, 
Name(s) 


Base Ten 


SVC Number Fanction 


Description 


29 Get Time & Date 4, BTIM, BDAT,| Return the System Time and date in the follow- 
CTIM, CDAT | ing parameters; 
BTIM = System Time in Binary (2 words, 
milliseconds since midnight) 
BDAT = System Date in Binary (2 words, 
year & day) 
CTIM = System Time in Characters (3 
words, HH:MM:SS) 
CDAT = System Date in Character (3 words, 
MM:DD:YY) 
The format of the date is year followed by day 
of the year (instead of the month). 
30 Create Task Variable Create a task under the user job as specified 


by the following parameters: 


1) TPRI - Relative Task Priority 

2) TID - Task identifier (user specified 
binary number). 

3) TSTART - Starting location of first instruc- 
tion task is to execute. 

4) TREG - Pointer to a register file. If the 
pointer is -l, the register file 
for the new task is to be the same 
as the creating task. If not -1, 
the parameter is a pointer to the 
register file containing values to 
be passed to the new task. 
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Base Ten 
SVC Number 


Table 5-2. 


Function 


Number of 
Arguments, 
Name(s) 


5) TSS 


6) TWCL 


The following input parameters are to be in- 
cluded only if the stack area for task creation 


is requir 


setup is required, the parameter list ends 


here. 


7) TSTK 


8) TWRK 


DX980 Supervisor Call Description (Continued) 


ed. 


- TCB STACK SIZE; number of 


words to be allocated in the 
auxiliary stack attached to the 
TCB. 

Wait Criteria List - A linear ar- 
ray of one or more words. If the 
first word of this parameter is 
zero, the task is to be created in 
the Ready state. If the first word 
is non-zero, the parameter is the 
Wait Criteria List and the task is 
created in the Dormant state. 


If no user supplied stack area 


Pointer to user supplied stack. 
This stack, within the user par- 
tition, is required if the reen- 
trant task to be created requires 
work space. 

Work Area flag. If zero, no 
work area is required. If non- 
zero, a pointer to the work area 
within the user supplied stack 
area is to be supplied. 
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Table 5-2. DX980 Supervisor Call Description (Continued) 


Number of 
Arguments, 
Name(s) 


Base Ten 


A ae 
SVC Number Se 


Function 


Argument flag word - i.e., if 
any arguments are supplied, each 
bit of this word corresponds to an 
argument and specifies whether 


(= 1) or not (= 0) to move the first 
word of the argument list to the 
TCB. 
10) ARG1 - Argument 1 address 
ARG2 - Argument 2 address 


ARGN - Argument N address 


3, MIP#, 
LOADR, 
EPA 


Load MIP# (Memory Image Phase Number), at 
LOADR (a specified load address) and return 
the address to give control at EPA (Entry 
Point Address). 


Lo ad 


3, MIP#, 
LOADR, 
EPA 


Load and Relocate: Same as SVC# 37 (LOAD) but perform the 


necessary relocation. 


5, CMDSTR, 
KEY, CTRL, 
PAKSTR, 

RESLAB 


A free format input record - Descriptor array 
for output string - Controls SVC4l1 processing - 
Packed output string - Reserved labels for. 
command operator 


Command Scanner 


Wait (Suspend) PRB 


for I/O 


Suspend execution of this user program until 
the I/O (specified by the PRB) completes. 
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Table 5-2. DX980 Supervisor Call Description (Continued) 


Number of 


Base Ten 


SVC Number Function Arguments, Description 
Name(s) 
Allocate Resource 2, JERR, Allocate Resource at runtime. 
IbDT JERR - Error/Availability Code returned to 
caller. 
0 means allocation made 
-5 means device offline 
-4 means device already assigned (un- 
available) 
-3 means device already committed 
(unavailable) 
>0O an error encountered during assign- 
ment. 

JLDT - A user supplied 'assign-time'’ LDT 
from which the "run-time'' LDT is 
built. 

De-allocate 2, JERR, De-allocate resource at run-time. 
Resource JLUNO JERR  - error code returned to caller. 
JLUNO - LUN number under users job of the 
resource to be de-allocated. 
Get Program », ARRAY Get program limits of Job partition and return 
limits values in the user supplied array. 
Start Job 1, J5B Starts an ''independent'' job from the user job. 


JSB (JOB START BLOCK) - a user supplied 
block, for starting a job. Includes any re- 
quired JLDT''s. 
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5,2 INPUT/OUTPUT - SVC NUMBER 0 


@LDM =ARGLST Set M-Register to List Address 


SVC 0 Execute Call 
ARGLST DATA 1 1 Argument 
DATA PRB Physical Record Block 


This I/O call requests the operating system to perform input/output or file 
management action. Sections Il and IV of this manual explain the system 
services available in response to this call. 


5.3 TERMINATE JOB - SVC NUMBER 1 


@LDM =ARGLST Set M-Register to List Address 
SVC 1 Execute Call 
ARGLST DATA 0 No Arguments 


This SVC terminates the job issuing the SVC. The Job Management system 
performs job termination, closes any files left open by the user, releases 
the files, devices and memory used by the job step, and prints a job step 
termination message on the system console. If the calling job step is the 
last or only step within a job, a job string termination message is also 
printed. 


SVC 1 is the standard terminating method for jobs that have reached a nor- 
mal conclusion. Although programs normally close all files and devices 
before termination, the operating system can also perform this function. 
Any incomplete input/output operation may be prematurely terminated. 


5.4 SET FLOATING POINT ADDRESS - SVC NUMBER 2 
@LDM =ARGLST Set M-Register to List Address 


SVC z Execute Call 
ARGLST DATA 1 1 Argument 
DATA FLT980 Package Entry Address 


This call supplies the operating system with the address of the floating point 
package within the user's program. The Set Floating Point Address call 
(SVC 2) must be issued before performing any floating point operation. The 
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Floating Point Package in the FORTRAN Subroutine Library must have been 
previously combined with the user program by the link editor. The argu- 
ment is the entry point address of the package. 
5.5 GET MEMORY LIMITS - SVC NUMBER 3 

@LDM =ARGLST Set M-Register to List Address 


SVC 3 Execute Call 
ARGLST DATA 1 1 Argument 

DATA LIMITS Limits Depository Address 
LIMITS BSS 2 Lower and Upper 


SVC 3 returns the memory limits of a user job area in the LIMITS argument 
of the SVC. Memory limits correspond to the lower and upper limit regis- 
ters that surround a user's addressable memory area. LIMITS is a two ele- 
ment vector that contains the lower limit in LIMITS (0) and the upper limit 
in LIMITS (1) when control returns to the user program. During program 
execution, this SVC can determine the job area size (<jarea>) that was spec- 
ified when the job was submitted. Since job area size varies with each job 
submission, this information tells a program the amount of memory supplied 
for a given submission. The lower limit is invariably returned as the value 
zero for protected programs. When using SVC 3, the following formula 
yields available memory for workspace: 

Workspace = Supplied Memory Size - Program Residence Requirements 


EE 
Upper Limit minus Last Program Address minus 


Lower Limit First Program Address 


SVC 98 performs a similar function and is simpler to use in certain cases. 


5.6 TERMINATE JOB ABNORMALLY - SVC NUMBER 4 


@LDM =ARGLST Set M-Register to List Address 

SVC 4 Execute Call 
ARGLST DATA LOL+6 2 if Optional Argument Used 

DATA ERRCOD Address of Binary Error Code 

DATA ERRID Optional, Address of 6-character ID 
ERRCOD DATA value System Console Prints Value + 1000 
ERRID DATA '‘ABCDEF' System Console Prints ABCDEF 


re LL 
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The operating system terminates a job abnormally because of a fatal program 
error. Similarly, the program can terminate itself abnormally because of 
an abortive error made by the user. Since the termination message and 
error code are displayed on the system console, a user can notify the con- 
sole operator of an abortive condition without assigning the system console 

to his program. To avoid confusion between user generated and system gen- 
erated termination codes, the system adds 10, 00016 to ERRCOD before 
printing. ERRCOD is a 16-bit number. 


5.7 TERMINATE TASK - SVC NUMBER 5 


@LDM =ARGLST Set M-Register to List Address 
SVC 5 Execute Call 
ARGLST DATA 0 No Arguments 


SVC 5 invokes normal task termination. If the subject task is the last or 
only task for a job, the job also terminates normally. 


5.8 DELETE TASK(S) - SVC NUMBER 6 


@LDM =ARGLST Set M-Register to List Address 
SVC 6 Execute Call 
ARGLST DATA ] 1 Argument 


DATA TASKID Address of Task Number 


TASKID DATA value 16-bit Value for TASKID 


This call deletes all tasks within the job whose identifying number corre- 
sponds to that given in TASKID. TASKID is a 16-bit binary number that 

must correspond to the TASKID supplied when the subject task(s) was created. 
SVC 6 can delete more than one task at a time if they have the same task 
identification (TASKID). If several tasks are created to perform a similar 
function, the user can thereby cancel them all at once. This SVC is used by 
one task to delete another. Thus, a supervisory routine can maintain control 
by creating and deleting tasks as dictated by the environment. 
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5.9 SUSPEND TASK (WAIT FOR EVENT) - SVC NUMBER 7 


@LDM = ARGLST Set M-Register to List Address 


SVC 7 Execute Call 
ARGLST DATA Number of Arguments 

DATA WCL Address of Wait Criteria List (WCL) 
a a ee a ee ee te Pen Co Nee eg yee gen ee Not Vee es ee ees ee a) 


DATA RETEDB Address of a structure containing the | 
returned event descriptor block (EDB) | 

. 

| 

t 


optional 
SS a a ee ee eee 
WCL DATA value A List of Events 
DATA value Descriptors 
RETEDB DATA $-$ This field will contain upon activation 


the EDB on which the last matched 
occurred. It must be the size of the 
largest EDB identified in the WCL. 


DATA $-$ 


SVC 7 suspends the calling task until the occurence of the selected combina- 
tion of events as described in the Wait Criteria List (WCL). The Suspend 
Task (SVC 7) and Post Event (SVC 8) calls are extremely useful in multitask 
environments. Together these two SVCs coordinate the activities of several 
tasks that are running asynchronously. The calls cooperate within a single 
job or between separate jobs. The suspend task SVC can also be used inde- 
pendently to wait for specified system events, such as time of day. A task 
may be suspended to wait for a single event or for several events to occur. 
Upon reactivation a user may determine on which EDB the last match oc- 


curred. 
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The returned event descriptor block argument is optional and, if specified, 
this argument is a pointer to a structure large enough to contain the largest 
EDB specified 'in the WCL. Upon reactivation of the task, this structure will 
contain the EDB on which the last match occurred. 


Be Dek WAIT CRITERIA LIST (WCL) 


| The Wait Criteria List is the only required argument for the Suspend Task 
SVC. A WCL contains one or more Event Descriptor Blocks (EDB) that de- 
fine the parameters that must be satisfied before the task can resume execu- 
tion. Figure 5-1 illustrates the components of an EDB. The Event Index 
(Word 1) is a numerical value that identifies the event to the operating system. 
These index values are given in the descriptions of system-wide and job- 
oriented event types later in this section. The index may require 0, 1 or 2 
I.D. words within the EDB. The number and meaning of the I.D. words is 
different for each index. 


A WCL containing only one EDB requires no further information. If the WCL 
contains more than one EDB, the EDBs must be preceded in the WCL by two 
words that prescribe: 


1. The two's complement of the number of EDBs in the WCL 
2. How many of the events must be satisfied before the task is activated. 


Figure 5-2 illustrates a WCL containing multiple EDBs. 


5.9.2 SYSTEM-WIDE EVENTS 


A system-wide event is an event that is beyond the scope of a single job. 
When tasks are suspended to wait for a system-wide event, the operating 
system places the associated EDB's in the job extension area, and links 
them together in separate lists for each event index. Each event index list 
may contain EDBs from several concurrent jobs. All system-wide events 
can be specified in an SVC 7 call as an event to reactivate a task. Some 
system-wide events can be specified in an SVC 8 call, while others can be 
posted only by the operating system. Those system-wide events that allow 
an SVC 8 call (user posting) provide the capability for synchronizing tasks 


EVENT INDEX 


WORD 1 
WORD 2 . EVENT |.D. WORD 1 
WORD 3 EVENT 1.0. WORD 2 


(A)129480 


Figure 5-1. Event Descriptor Block Organization 
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WORD 1 


? 
TWO S COMPLEMENT OF NUMBER OF EVENTS IN WCL 
NUMBER OF EVENTS TO ACTIVATE TASK 
EDB 2 


WORDS N-N+2 | EDBN | 


(A)129381 


WORD 2 


WORDS 3-5 


WORDS 6-8 


Figure 5-2. WCL With Multiple EDB 


across job boundaries. Table 5-3 lists the system-wide events and their 
attributes. The following paragraphs define the column headings of that 
table. 


5.9.2.1 USER WAITABLE,. This column indicates whether the event can 
be the object of an SVC 7 call (user wait) from a user program. 


5.9.2.2 USER POSTABLE,. This column indicates whether the event can 
be posted by the user with an SVC 8 call. User postable system-wide events 
are not remembered for matching with subsequent SVC 7 calls. Therefore 
the SVC 7 suspend must precede the SVC 8 post. 


5.9.2.3 SINGLE OR MULTIPLE MATCH. When an event is posted, the 
operating system scans all the EDBs linked with the posted event index to 
determine if the posted event releases any of the waiting tasks. Similarly 


(but only for savable job-oriented events), when a task is suspended, the 
operating system examines previous postings to determine if the event spec- 
ified in the Suspend Task call has already happened. User postable system- 
wide events are not remembered beyond a single scan. Therefore, a Suspend 
Task call awaiting a previously user-posted system-wide event must wait for 
the next posting to be released. The single or multiple match column spec- 
ifies how far the operating system will search following the posting of an 
event. If the table indicates a single match, then the operating system scans 
waiting EDBs until it finds only one task to release. If the table indicates a 
multiple match, the operating system scans all waiting EDBs in the list and 
releases all tasks that are waiting for that event. When multiple tasks are 
released, processing will proceed in priority order. Tasks are released if 
the event I,.D. words of both the SVC 7 and SVC 8 match as specified by the 


Relational Operator. 
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Table 5.3. User Accessible System-Wide Events 


Single or 
Multiple 
Match 


Relational Number Event 
Operator | I1.D. Words Description 


Index User User 
Number | Waitable | Postable 


Multiple Time-of-day (double 
prec. word in milli- 
seconds) 


Multiple Delta time (double 
prec. word in milli- 
seconds; 100 ms min) 


Multiple Any job step termi- 
nation 


Multiple Particular job string 
termination (bits 0- 
11 = job string no.) 


| |Multiple va) 
Single Open to 
’ Single Open to 
Multiple Open to 
Multiple Open to 
Multiple Open to 

NOTES: 
@ If Bits 0-7 of the event I.D. are not all one's, then the com- 
pare relation operator ''='' is done on all of the event I1.D.; 


otherwise, it is only done on Bits 8-15 of the event I.D. 


@ The event I.D. is a 16-bit composite of an internal de- 
vice I.D. and a control character, as follows: 


o 7 8 15 


DEVICE 1.0, CONTROL. CHARACTER 


The internal device I. D. is an 8-bit field that identifies 
the data terminal where the control character is gener- 
ated. This field is set to a >FF if the match is to be 
made on any data terminal generating the control char- 
acter. The control character is a 7-bit pattern gener- 
ated on the data terminal. Refer to the table of USASCI 
Control Characters in Section III to determine which 
control characters.are postable. 


5.9.2.4 RELATIONAL OPERATOR. This column lists the criteria for 
determining if the I.D. words of a posted event match the I1.D. words of 
a waiting task. The task is released if the 1.D. words are equal (=), or 
if the I.D. words of the posted event are greater than or equal to (>) the 
waiting task's I.D. words. 
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NUMBER I.D. WORDS. 


This column lists the number of I,D 


words that must be included in the EDB of an SVC 7 call that specifies the 
assocaited event index number. . 


ee me, 


JOB ORIENTED EVENTS 


Job oriented events synchronize tasks within a single job. All job oriented 


events are User Postable and have a Relational Operator of ''="'. 


A job ori- 


ented event may be posted by a task even though no other task is currently 


waiting for that event. 


If the event is specified as savable, the post is pre- 


served until a corresponding wait is issued, or until the job terminates. 


Once saved, the post is not retained past the first match. 
the job oriented events and their attributes. 


of the events that it uses. 


5.10 


Table 5.4. 


@LDM = ARGLST 


sVC 


ARGLST DATA 
DATA 
DATA 
DATA 
DATA 


EDB 


8 


1 
EDB 


Event index 
I.D. Word 1 
I.D. Word 2 


Savable 


Table 5-4 lists 
Each job defines the functions 


Job-Oriented Events 


Single or 
Multiple 


Number 
I, D. Wo rds 


Single 1 
Single Z 
Single 1 
Single ] 
Single 2 


Multiple 
Multiple 


Multiple 
Multiple 


POST AN EVENT - SVC NUMBER 8 


Set M-Register to List Address 
Execute Call 


1 Argument Address 
Address of Event Descriptor Block 


Event Descriptor Block 


a Ene 


Change 1 


5-15 Digital Systems Division 


oO 
WO 943005-9701 


The Post Event SVC notifies the system that the specified event has occurred. 
The system then performs the necessary processing to either activate waiting 
tasks or queue the event posting. Queueing occurs only for savable job- 
oriented events that have no tasks waiting for them at the time of the posting 
call. System-wide events are posted according to the attributes defined for 
the corresponding event index. These postings may affect tasks throughout 
the system. Job oriented events are posted according to the corresponding 
job oriented event index. These postings can only affect tasks within the 
same job. 


The Post Event SVC contains only one argument: an Event Descriptor Block 
(EDB). The format of the EDB for SVC 8 is the same as that for SVC 7. 


5.11 GET TIME AND DATE - SVC NUMBER 29 


@LDM =ARGLST Set M-Register to List Address 

SVC 29 Execute Call 
ARGLST DATA 4 4 Arguments 

DATA BTIM Address for Binary Time (Milliseconds) 

DATA BDAT Address for Binary Date (Year, Day) 

DATA CTIM Address for Character Time (Hours, 

Minutes, Seconds) 
DATA CDAT Address for Character Date (Month, 
Day, Year) 
BTIM BSS 2 Binary Milliseconds Since Midnight 
BDAT BSS 2 | Binary Year, Binary Day in Year 
CTIM BSS 3 HHMMSS in USASCII 
3 MMDDYY in USASCII 


CDAT BSS 


This call gets the current time and date from the system. The operator 
supplies the system with time and date at IPL time and may change it from 
the operator's console while DX980 is running. An interval timer main- 
tains the time for the system. There are 86,400,000 milliseconds in a day. 
The double length time word accomodates 1,073, 741, 823 milliseconds. 
Therefore, the timer does not overflow during a day. The interval timer 
for most installations interrupts each 100 milliseconds so that BTIM is 
truncated to the nearest 100 milliseconds. 
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@LDM =ARGLST 


ARGLST DATA 


TF LAG 


CREATE TASK - SVC NUMBER 30 


Set M-Register to List Address 


SVC 30 Execute Call 
n Number of Arguments 
DATA TPRI Address of Task Relative Priority 
DATA TID Address of TaskIdentifier __ 
DATA TSTART Address of Task Entry Point 
DATA TREG Address of Starting Register Values 
DATA TSS Address of Task System Stack Size 
DATA TWCL Address of Task Wait Criteria List 
'DATA TSTK Address of User Stack Address 
'DATA TWRKA Address of Flag for Work Area 
'DATA TFLAG Address of Argument Flags ! 
(‘DATA ARGI User Argument Address 1 I 
'DATA ARG2 User Argument Address 2 
DATA Priority Relative to Job 
DATA Arbitrary 16-Bit Task 1.D. 
REF TSTART Task Entry Point 
DATA -1=Undefined Register Values, Otherwise, 
Points to Starting Values for A,E,X,M, 
 S,Land B. 
DATA System Stack Size, for New Task 
DATA Zero, or Wait Criteria List if the Task 
begins Suspended While Awaiting for 
a Posted Event (See SVC 7). 
DATA AREA Address of Stack Area 
BSS size Stack Area for Building Call Arguments 
for Task 
DATA 0. If Not Zero, a flag indicating User Work 
Area in AREA 
DATA 0 Bits that Equal 1 to Indicate Arguments 


Transcribed into AREA 


Once a job is running with the single task created by the system, additional 


tasks can be created from the user program with the SVC 30 call. 


The 


created tasks can have an equal or lower priority (high numerically) than 


the job under which the task runs. 


Change l 


The priority for a new Task, TPRI, is 


a ee 
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stated relative to the basic job step priority specified in JCL (<jsprty>). 

TID supplies an identifier for the new task. The identifier may be refer- 
enced in a subsequent SVC 6. The starting address for program execution 
within the task is supplied as TSTART. TREG is a pointer to a set of values 
for the register file. If the pointer is to a -1, the register file values for 
the new task are undefined. If the location does not contain -1, the param- 
eter points to values to be passed to the new task in A, E, X, M, S, L, and 
B registers. The new task requires allocation in the job extension area mem- 
ory for system temporary storage (see Section II, < stksize>). TSS specifies 
this allocation. The argument TWCL, if zero, indicates that the new task is 
to be created active. If the first word of TWCL is not zero, then it and sub- 
sequent memory words constitute a wait criteria list as defined under SVC 7 
and the task is created in a suspended state. The wait criteria list defines 


the event(s) that activate the new task. 


5.12.1 OPTIONAL ARGUMENTS 


The call arguments TSTK, TWRKA, TFLAG, and ARG; are optional. If none 
of these are furnished, the new task receives a value defined by TREG in 

the M-Register. If these arguments are supplied, the M-Register points to 
AREA as specified by TSTK in the call. The operating system establishes 
the first word of AREA to specify the number of address arguments to be 
placed in AREA. Any address arguments that the operating system tran- 
scribes into AREA before activating the task appear in the following order: 


1, The address of work space within AREA 
2. ARGI 
3. ARG2 


Each bit in the TFLAG argument corresponds to one of the supplied argument 
addresses; bit 0 represents the first address, bit 1 represents the second ad- 
dress, etc., to a maximum of 16 addresses. If the bit is a zero, the oper- 
ating system transcribes the argument address (ARGi) into AREA. If the bit 
is a one, the operating system transcribes the argument value into AREA 
immediately following the argument addresses, and alters the corresponding 
argument address in AREA to point to the location in AREA containing the 
argument value. Figure 5-3 illustrates possible contents of AREA when the 


task is activated. 


5.12.2 CREATE TASK EXAMPLES 


The following paragraphs illustrate some uses of the Create Task SVC. 


ee hs hs SSSSSNS PN 
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NO ADDRESSES GIVEN 
IN CALL 


M-REGISTER ge AREA 


POINTS TO 


OR 


M—-REGISTER ge AREA 


POINTS TO 


M-REGISTER 
POINTS TO 


——fe AREA 


TWRKA 


USER ARGUMENTS 
SUPPLIED 


USER ARG! 
ADDRESS 


USER ARG2 
ADDRESS 


USER ARGN 
ADDRESS 


USER ARGUMENTS 
BUT SCRATCH WORK 
AREA SUPPLIED 


SCRATCH 
WORK AREA 


NUMBER OF ARGUMENTS IN AREA 


USER ARGUMENT ADDRESSES 


ADDRESS OF WORK AREA 


OR 


M-REGISTER 
POINTS TO 


—— AREA 


BOTH SCRATCH WORK 
AREA AND USER 
ARGUMENTS 


NUMBER OF ARGUMENTS +1 


ADDRESS OF WORK AREA 


USER ARG! 
ADDRESS 


USER ARG2 
ADDRESS 
e 


USER ARGUMENT ADDRESSES 


e 
USER ARGN 
ADDRESS 


"TWRKA SCRATCH 
WORK AREA 


TFLAG=400016 
(TRANSCRIBE ARGUMENT 2) 


ADDRESS OF WORK AREA 


USER ARGI1 
ADDRESS 


NEW 2 I NEW ADDRESS FOR ARG2 


| USER ARG3 
ADDRESS | 


NEW COPY OF 
News USER ARG2 


SCRATCH 
TREE WORK AREA 


Figure 5-3. Sample TSTK Contents 
At Task Activation 
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Died oe eet 


NO ARGUMENTS. 


The following sample call creates a task that 


activates a non-reentrant subroutine, NEWTSK, with no arguments. 
NEWSTK performs non-file I/O, thus requiring a TCB stack of 110 words. 


@LDM 
SVC 
BRU 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


ZERO 
TASKID 
MINUS1 
TCBS TK 


DATA 
DATA 
DATA 
DATA 
REF 


Delaecec 


DORMANT TASK, 


=LIST 
30 
NEXT 


£ 
oO 


ZERO 
TASKID 


NEWTSK | 


MINUS 1 
TCBSTK 
ZERO 


0 

] 

-1 

110 
NEWTSK 


Set List Address 
Create Task 
Computation continues <= 


Six Arguments in List 

New Task Priority Same as Job Priority 
Numeric Task Identifier 

Pointer to NEWTSK 

No Register Arguments 

TCB Stack of 110 Words 

Create Active Task 


Constants, Arguments, etc. 


The following example creates a dormant task 


that activates in 10 seconds and then activates a non-reentrant subroutine, 


NEWTSK, with no arguments. 


ing a TCB stack of 110 words. 


@LDM 
SVC 
BRU 
DATA 
DATA 


LIST 


DATA 
DATA 
DATA 
DATA 
DATA 


=LIST 
30 
NEXT 


6 
ONE 


TASKID 


NEWTSK 


MINUSI1 
TCBSTK 
WCL 


NEWTSK performs non-file 1/O, thus requir- 


Set List Address 
Create Task 
Computation Continues 


Six Arguments in List 

New Task Priority One Lower Than 
Job Priority 

Numeric Task Identifier 

Pointer to NEWTSK 

No Register Arguments 

TCBSTK of 110 Words 

Pointer to Wait Criteria List 


(listing continued on next text page) 
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(listing continued from preceding text page) 


Constants, Argurnents, etc. 


ONE DATA ] 
TASKID DATA 0 
MINUS1 DATA -1 
TCBSTK DATA 110 
WCL DATA 23 
DATA 0 
DATA 10000 
REF NEWTSK 


5.12.2.3 ARGUMENTS INA AND X. The following example creates a task 
that activates a non-reentrant subroutine, NEWTSK, with one argument in 
the A register and one argument in the X register. NEWTSK performs non- 
file 1/O, thus requiring a TCB stack of 110 words. 


@LDM =LIST Set List Address 
SVC 30 Create Task 
BRU NEXT — Computation Continues 
LIST DATA 6 Six Arguments in List 
DATA ZERO New Task Priority Same as Job Priority 
DATA  TASKID Numeric Task Identifier 
DATA NEWTSK Pointer to Newtsk 
DATA TREG Pointer to Register File 
DATA TCBSTK TCB Stack of 110 Words 
DATA ZERO Create Active Task 


Constants, Arguments, etc. 
TREG DATA RFILE 


ZERO DATA 0 
TASKID DATA 1 


RFILE DATA I A Register - Address of I 
BSS 1 E Register - Dummy 
DATA 10 X Register - Index of 10 
BSS 1 M Register - Not Specifiable 
BSS 3 S, L, B - Dummy | 


TCBSTK DATA 110 
REF NEWTSK 
I BSS 100 Data Array 


II 
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5.12.2.4 TWO ARGUMENTS. 
activates a non-reentrant subroutine, NEWTSK, with two arguments, ARGi 


The following example creates a task that 


and ARG2Z. NEWTSK performs non-file 1/O thus requiring a TCB stack of 
110 words. 

LDM =LIST Set List Address 
SVG 30 Create Task 
BRU NEXT Computation Continues 

Lis'F DATA II Eleven Arguments in List 
DATA ZERO New Task Priority Same as Job Priority 
DATA TASKID TASKID of One 
DATA NEWTSK Pointer to NEWTSK 
DATA MINUS1 No Register Arguments 
DATA TCBSTK TCB Stack of 110 Words 
DATA ZERO Create Active Task 
DATA STKPTR Stack for Argument List 
DATA ZERO No Work Space 
DATA ZERO No Volatile Arguments 
DATA ARQGI1 Pointer to First Argument 
DATA ARG2 Pointer to Second Argument 

Constants, Arguments, etc. 

ZERO DATA 0 

TASKID DATA 1 

MINUSI DATA -1 

TCBSTK DATA 110 

STKPTR DATA $41 
BSS 3 

ARGI1 DATA <X,Y,Z 

ARG2Z DATA I,J 
REG NEWTSK 


5.12.2.4 TWOARGUMENTS AND WORKSPACE, The following example 
creates a task that activates a reentrant subroutine, RSUB, with two argu- 
ments, ARG1 and ARG2. RSUB performs file 1/O, thus requiring 300 words 
of TCB stack. In addition, RSUB requires 10 words of remote data area for 


workspace. 
@LDM =LIST Set List Address 
SVC 30 Create Task 
BRU NEXT Computation Continues 


(listing continued on next text page) 
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(listing continued from preceding text page) 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


LIST 


DATA 
DATA 
DATA 
DATA 
DATA 
BSS 
DATA 
DATA 
REF 


ZERO 
TASKID 
MINUS 1 
TCBSTK 
STKPTR 


ARGI 
ARG2 


11 

ZERO 
TASKID 
RSUB 
MINUSI1 
TCBSTK 
ZERO 
STKPTR 
MINUS1 
ZERO 
ARGI 
ARG2 


0 

2 

-1 

300 
$+1 

14 

KY -Z 
Pcs, 
RSUB 


Eleven Arguments in List 

New Task Priority Same as Job Priority 
TASKID of Two 

Pointer to RSUB 

No Register Arguments 

TCB Stack of 300 Words 

Create Active Task 

Stack for Argument List and Work Area 
Nonzero Signifies Work Area Supplied 
No Volatile Arguments 

Pointer to First Argument 

Pointer to Second Argument 


Constants, Arguments, etc. 


LOAD MEMORY IMAGE PHASE - SVC NUMBER 37 


NOTE 


SVC 37 is not normally used directly by a user pro- 


gram. 


Normally the overlay manager calls SVC 37 


for the user as described in Section VIII for DXOLE. 


@LDM 
SVC 
ARGLST DATA 
DATA 
DATA 
DATA 
MIPNUM DATA 
MODULE BSS. 
LOADR DATA 
EPA BSS 


-ARGLST 
37 


3 
MIPNUM 
LOADR 
EPA 


n 


k 


MODULE 
1 


Set M-Register to List Address 
Execute Call 


3 Arguments 

Address of Memory Image Phase Number 
Address at Which to Load 

Entry Point Address 


Memory Image Phase Number per DXOLE 
Load Map 
Overlay Area 


Start Address for Execution 
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SVC 37 loads memory image phases directly from the load module file as- 
signed to the running job. A memory image phase is a separate program 
segment that was produced by the DX980 Linkage Editor (DXOLE), DXOLE 
assigns a number to each memory image phase and outputs that number as 
part of the DXOLE load map. Refer to the DXOLE description in Section VIII 
of this manual for further details on load modules and memory image phases. 
The SVC 37 call applies to preplanned overlays. This means that the link 
editor must establish the load address relative to the main program (root). 
The overlay may only be loaded at that one relative address. On return 
from SVC 37 EPA contains the entry point address of the loaded phase. | 


5,14 LOAD AND RELOCATE MEMORY IMAGE PHASE - SVC NUMBER 38 
@LDM =ARGLST Set M-Register to List Address 


svc 38 Execute Call 
ARGLST DATA 3 3 Arguments 
DATA MIPNUM Address of Memory Image Phase Num- 
ber 
DATA LOADR Address at Which to Load 
DATA EPA Entry Point Address 
MIPNUM DATA nn Memory Image Phase per DXOLE Load 
- Map 
MODULE BSS k Overlay Area 
LOADR DATA MODULE 
EPA BSS: 1: Start Address for Execution 


SVC 38 transfers memory image phases to memory and relocates them with- 
in memory. The relocation map for the memory image phases is brought in- 
to the job extension area at the same time that a memory image phase is 
brought into the job area. The relocation map must, therefore, be consi- 
dered when determining the size of the job extension area. The size of the 
relocation map can be determined by dividing the number of words in the 
memory image phase by sixteen (one map bit per phase word). This call ap- 
plies to overlays that are not preplanned. Therefore, the link editor did not 
assign a fixed address to the overlay relative to the main program (root). 
The LOADR cell holds the load address of the module. This address may be 
determined dynamically. On return from SVC 38 EPA contains the entry 
point address of the loaded phase. 


a 
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5.15 COMMAND SCANNER MODULE ~ SVC NUMBER 41 
ee ee ee ae 


CLDM = ARGLST Set M-Register to List Address 
SVC 4] Execute Call 


ARGLST DATA n number of arguments 
DATA CMDSTR command string 
DATA KEY key word area 
DATA CTRL control information 
DATA  PAKSTR packed string 
DATA RESLAB reserved labels 


DATA MAXCH number of characters to scan 


= 
i 
i 
' 
optional | 


The Command Scanner SVC is a DX980 nucleus module that can be accessed 
through SVC 41. SVC 41 accepts free format command records and pro= 
duces fixed format arrays. Table 5-5 describes the language syntax accepted 
by the command scanner. 


5.15.1 EXTERNAL INTERFACE 


The linking to SVC 41 is identical to the linkage for other SVC's. The M reg- 
ister points to an argument list. The first word of the list contains the num- 
ber of arguments. Subsequent words contain the argument addresses. 


5.15.1.1 INPUT. All arguments, except PAKSTR, must be initialized by 
the calling routine before issuing the SVC. The following parameters are 
necessary as input: 


CMDSTR. The command string may be a variable length input record. 
If the MAXCH argument is specified, then the size of the command is 
specified via this argument; otherwise, the command string is assumed 
to be an 80 character input record, in which case if the actual string 
is less than 80 characters long, it should end with a period or semi- 
colon, or have the remaining characters filled with blanks. 


KEY. KEY is anarray that holds the descriptors for the command plus 
all arguments in CMDSTR. The calling routine must zero the first word 
of the KEY array before invoking the SVC. If the Command Scanner 

later requests continuation records for a command, the first word con- 
tains a non-zero value. This value should not be changed until the calling 


routine wants to start a new command. 


Change 1 5-26 Digital Systems Division 


fe} 
rig 943005-9701 


Table 5-5. Description of Command Language (Backus-Naur Format) 


<command >::=<command string>. 
<command string>::=<command identifier>| 
<command identifier> <delimiter> <operand string> 

<command identifier> ::= <label>| <blanks> <label> 
<operand string> ::= <operand> 

l<operand string> <delimiter> <operand> 
<delimiter> ::=,!4% % <delimiter> | <delimiter> #]; 
<blanks> ::=%<blanks>]% | (no characters) 


A command can extend over several input records. The first 
characters on the record will be ignored if CTRL word 5 is 
appropriately set. If a command extends to the next record, 
then the rightmost delimiter on the current record should be 
a semi-colon. If neither a period nor a semi-colon is pres- 
ent at the end of a record, then a period is assumed. Com- 
ments may appear between the period or semi-colon and the 
end of the record. The command identifier is compared 
against the labels in the Reserved Labels table. If the com- 
mand identifier is found in the table, the identifier is treated 
as a Reserved Label; otherwise, the command identifier is 
treated as a label. Only the leftmost eight characters of the 
command identifier are significant. 


<operand> ::= <label>| <number>| <expressions> | <range> 
]<empty operand> 
| <string> |<assignment> 
<label>::=<letter> | <label> <letter> | <label><decimal digit> 
<letter> ::= AlB| C[D/ElFlclulriglklLIminlolPlalrisitlulvlwixlylz 
The length of labels is not restricted. 
<number> ::= <sign><decimal integer>|<decimal integer>|<hex integer> 
<decimal integer> ::=<decimal digit> |<decimal integer> <decimal digit> 
<decimal digit>::= ol1l2l3l4[5lélzlsl9 
<sign>::=+1- 


<hex integer> ::=><hex digit>|<hex integer> <hex digit> 


ee 
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Table 5-5. Description of Command Language 
(Backus-Naur Format) (Continued) 


<hex digit> ::= olilalslalslél7lslolalslclplelr 


Decimal integers must be in the range of -32768 to 32767. 
Hex integers must not contain more than four hex digits. 
Numbers larger than four hex digits must be described by 
strings. 


<expressions> ::=<label>+<right side> 
| <label> (<subscripts> )=<right side> 
<right side>::=<number>| <label>|] <string>] (< subscripts> ) ]<range> 
<subscripts> ::=<subscripts> , <script>] <script> 
<script>::= <number>|<label> 
The number of subscripts allowed is not restricted. 
<empty operand>::= {the empty set} 


An empty operand is generated for every occurrence of 
one of the following conditions: 


e Apair of commas separated by no other characters 
or only by blanks. 


e Acomma and a period separated by no other char- 
acters or only by blanks. 


e A comma and a semi-colon separated by no other 
character or only by blanks. 


<subscripted expression>::=<label>(<subscripts> )= <right side> 

<subscripts> ::=<subscripts>, <script>|<script> 

<script>::= <number>|] < labels> 
The number of subscripts allowed is not restricted. 

<string> ::=]|<substring>| 

<substring> ::=<character>| < substring> <character> 

<character>::= Any USASCII character. Ifa ''l' is to appear ina 
<substring> , then ''Il" should appear in the input to the scanner. 
The length of the strings is not restricted. 

<assignment>::=<label>: =<label> 


<range> ::=<number> :<number> 
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CTRL. 
e 
® 


CTRL is a six word array, that must be initialized as follows: 
Word 0 - Number of Characters Reserved for PAKSTR 
Word 1 - Number of Words Reserved for KEY 


Word 2 = Not Initialized by the Calling Routine. Used by 
Command Scanner for Workspace 


Word 3 - Not Initialized by the Calling Routine. Used by 
Command Scanner for Workspace 


Word 4 - Number of Labels in RESLAB 


Word 5 - The Column Number in CMDSTR Where Scanning is 
to Start; the First Column in CMDSTR is Column 
Zero. 


MAXCH. MAXCH is a one-word field containing the number of char- 
acters to scan. This argument is optional and if not specified the com- 
mand string size is assumed to be 80 characters. 


5.15Scl.2 OUTPUT: 


workspace. 
guments. 


SVC 41 changes PAKSTR and KEY, plus two words of 
The following paragraphs describe the effects on these two ar- 


PAKSTR. PAKSTR is used for storage of alphanumeric fields that were 
retrieved from CMDSTR. The fields are packed together under control 
of the KEY array. 


KEY. The first word of KEY contains a completion code. The remain- 


ing words contain a translation of the command string. 


The value of the 


completion code indicates one of the following conditions: 


Change 1 


Normai End of Scan - A complete command has been success- 
fully decoded. 

Continuation Requested - The command extends across more 
than one record. The value of the completion code minus one 
is the number of continuation records previously read. KEY 
array contains descriptors for all fields of CMDSTR that have 
been scanned. 


Error - Scanning of CMDSTR is terminated. The value of the 
completion code indicates which error has occurred. Table 
5.6 describes the error numbers. The KEY array contains 
descriptors for all fields of CMDSTR that have been scanned. 
However, the last descriptor may be incomplete or erroneous. 
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Table 5-6. Error Codes 


Explanation 


Overflow of the keyword area. 


Overflow of packed strings character string. 

The right-hand side of an expression or range is missing. 
Unrecognizable or illegal subscript. 

Missing delimiter after command identifier. 

Number is larger than 16 bits. 

Operand starts with illegal character. 

Illegal digit in number. 

Missing delimiter after operand. 
Missing delimiter after subscript. 
Illegal character precedes command. 
ITS Run command does not contain a label or an expression. 
Missing equal sign following colon in assignment. 
The right-hand side of an assignment is missing. 
Too many equal signs in expression. 


Negative number of characters specified for PAKSTR by 
CTRL word 0. 


Non-positive number of words specified for KEY by CTRL 
word l. 


Non-positive number of labels specified for reserved 
labels list (RESLAB) by CTRL word 4. 


The starting column for the scan, specified by CTRL 
word 5, does not fall into the range of zero to seventy-nine. 


Following the completion code is a description of the translation of CMDSTR. 
The second word of KEY contains the number of operands detected in 
CMDSTR. The remainder of KEY contains descriptors for the operands. 
The format for KEY is illustrated in figure 5-4. The operand descriptors 
are described in figure 5-5. The eight possible descriptor types are: 
Label, Number, Expression, Range, Reserved Label, Empty Operand, 
String, and Assignment. 
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LABEL DESCRIPTOR EMPTY OPERAND DESCRIPTOR 


NUMBER OF CHARACTERS 
IN LABEL 


POINTER TO START OF 
LABEL IN PAKSTR SUBSCRIPTED EXPRESSION DESCRIPTOR 


re ee ee 


NUMBER DESCRIPTOR 


NUMBER OF CHARACTERS 
IN LABEL 


DESCRIPTION OF 
LABEL ON LEFT SIDE 


POINTER TO START OF 


VALUE OF NUMBER LABEL IN PAKSTR 


NUMBER OF SUBSCRIPTS ON 
LEFT SIDE 
DESCRIPTORS FOR 


DESCRIPTORS FOR LEFT SIDE | (SERipre SUB” 


SUBSCRIPTS (NC DESCRIPTORS 
ASSIGNMENT DESCRIPTOR IF NUMBER SUBSCRIPTS = 0) 


NUMBER OF SUBSCRIPTS 
ON RIGHT 


DESCRIPTORS FOR 
RIGHT SIDE SUB— 


DESCRIPTORS FOR RIGHT SIDE SCRIPTS 


NUMBER OF CHARACTERS 
IN LABEL 


LEFT SIDE OF SUBSCRIPTS (MUST BE AT 
ASSIGNMENT 
POINTER TO START OF Pens ONE) 
LABEL IN PAKSTR a ae a ee ) 


NUMBER OF CHARACTERS 
IN LABEL 


RIGHT SIDE OF 
ASSIGNMENT STRING DESCRIPTOR 
POINTER TO START OF 

LABEL. IN PAKSTR 


NUMBER OF CHARACTERS 
IN STRING 


RANGE DESCRIPTOR 


POINTER TO START OF 
STRING IN PAKSTR 


RESERVED LABEL DESCRIPTOR 


POINTER INTO RESLAB 


(A)130126A 


Figure 5-5, Templates for Descriptors in KEY Array 


a 
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KEY ARRAY IN MEMORY 


WORD 0 
WORD 1 
WORD 2 
@ 
e DESCRIPTOR FOR 
e EACH OPERAND 
WORD N 
(A)130120 


Figure 5-4, Format of Key Array After Return from SVC 41 


5.15.2 SVC 41 EXAMPLE 


The ITS Supervisor uses SVC 41 to decode commands from each terminal. 
The arguments could be declared as follows: 


CMDSTR BSS 80 Terminal command line 
KEY BSS 50 Key array 
CTRL DATA 80 Number of characters in PAKSTR 
DATA 50 Number of words in KEY 
BSS 2 Workspace for SVC 41 
DATA 12 Twelve valid commands 
DATA 0 START SCAN at 0 
PAKSTR BSS 80 Packed string 
| RESLAB DATA 'LOGON '! Reserved labels 
DATA 'LOGOFF' 
DATA 'RUN 
DATA 'STATS §' 
DATA ‘EDIT : 


DATA 'ENTER ' 


(Listing continued on next text page) 
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(Listing continued from preceding text page) 


DATA 'JOB ! 
DATA 'DELETE! 
DATA 'Fl ' 
DATA 'F2 : 
DATA 'Al , 
DATA 'A2 / 


If a terminal user enters the following command: 
EDIT FILE=(1, USERO1, MVFILE). 


The command is stored in CMDSTR by an ITS I/O routine. The ITS super- 
visor issues SVC 41 with the standard argument linkage for SVC's. After 
control returns from the command scanner, PAKSTR and KEY contain the 
values illustrated in figure 5-6. 


PAKSTR 


SCAN COMPLETE 


5 DESCRIPTORS 


COMMAND 


a 


LEFT SIDE OF EXPRESSION Ps 


a 


a 
NO SUBSCRIPTS ON bee SIDE 


3 SUBSCRIPTS ON RIGHT SIDE 


FIRST ARGUMENT 


ro 


SECOND ARGUMENT aaa 


THIRD ARGUMENT 


KEY 
6 
6 


(A)130122 


Figure 5-6. Resulting Contents of KEY and PAKSTR 
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5.16 WAIT FOR I/O - SVC NUMBER 43 


@LDM =ARGLST Set M-Register to List Address 


SVC 43 Execute Call 
ARGLST DATA 1 1 Argument 
DATA PRB Address of PRB Used for Initiate Call 


The Wait for I/O SVC is used in conjunction with an Initiate I/O data transfer 
(see Section III) or with a multitasking program that requires synchronization 
of 1/O and processing tasks. For Initiate 1/O calls the calling program con- 
tinues execution during the actual1/O transfer. If processing must be dis- 
continued at some point in the program until a requested 1/O transfer is com- 
plete, the Wait for1/O SVC is issued. Program execution is then suspended 
until the I/O transfer is complete. If the 1/O is already complete, process- 
ing proceeds without suspension. 


The procedure is similar for multitasking programs except that a separate 
task issues an Execute 1/O rather than an Initiate 1/O call. Other tasks 
issue a Wait for 1/O SVC to synchronize the 1/O with processing portions of 
their program. 


ee ee ee a 
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Bele ALLOCATE RESOURCE - SVC NUMBER 49 
@LDM =ARGLST Set M-Register to List Address 


sVC 49 Execute Call 
ARGLST DATA 2 2 Arguments 
DATA JERR Address or Return of Error Code 
DATA JLDT Address or Resource Assignment Block 
JERR Bos ] 0=Ok, 39=Device Offline, 88=Device Un- 
available, > 0=.Error 
JLDT BSS 20 Assignment Block 


The Allocate Resource SVC assigns a logical unit to a device or file from 
within user code at runtime. This feature permits extension of the job as- 
signments that were made with JCL (refer to Section II for a discussion of 
JCL assignments). In response to SVC 49, the operating system checks the 
availability of the requested resource. If the resource is available, the op- 
erating system assigns that resource to the specified user job LUN. If the 
specified LUN matches a previous user LUN, the new assignment super- 


cedes the old assignment. 


When using SVC 49 with a high priority program, 
ensure that lower priority programs have not re- 
served the requested resource. Failure to observe 
this precaution may deadlock the system until the 
lower priority program releases the device. 


Input parameters for SVC 49 are one word for error code return, plus 
another word group for the resource assignment block. The error code re- 
turned in the first parameter is one of the following quantities: 


e 0 = Allocation Made 

e 39 = Device Offline 

@ 88 = Device Already Assigned/Committed 
e other (See Appendix A for error codes) 


The resource assignment block (JLDT) describes the file or device to be 
assigned. The length of this block varies. It is four words long for a de- 
vice assignment, 13 words long for an old file assignment, and 20 words 
long to define a new file or replace an old file. Table 5-7 lists the word and 
bit assignments for all fields of the resource assignment. Unused fields 
should contain zeros for compatability with future uses. 


a 
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Table 5-7. Resource Assignment Block (JLDT) Format 


Field Description 


| Flag Word 
0 | Not used 
1 Device(0)/file(1) flag 
| 2 | Not used 
| 3 | Exclusive(0)/shared(1) access flag | 
4.5 | Not used(00)2 
6 | No pass(0)/pass(1) resources flag 
| Remainder of bits applicable to file assignments only: 
7 | No delete(0)/delete(1) file flag 
8-9 | Disposition flag: 
| | 002 = Assign old file | 
| | | 012 = Define new file 
| 102 = Replace old file | 
| 112 = Illegal disposition | 
10-11 | File type flag | 
| 002 = Illegal type 
| | 012 = Linked sequential | 
| 102 = Relative record | 
112 = Key indexed 
12 | Permanent(0)/temporary/(1) file flag - | 
P3515 Not used (000)s | 
: 
0.7 Not used 
| | 8-15 | Logical unit number (LUN) | 
2 Device index (decimal 1-256 corresponding to device re- | 
quired). Actual device indexes for the physical devices 
can be obtained through the List Device (LD) command 
during IPL. | 
3 Reserved for future use | 
Remainder of words applicable to file assignments only: 
4 Number of buffers to be used for file I/O 
Sa 7 File owner user ID (6 USASCII alphanumeric characters) 
| 8-10 File name (6 USASCII alphanumeric characters) 
re 


| Liat | | File password (4 USASCIi alphanumeric characters) | 


5-35 Digital Systems Division 


12) 
rig 943005-9701 


Table 5-7. Resource Assignment Block (JLDT) Format (Continued) 


Bit Field Description 


Remainder of words applicable to file define/replace 
only: 


Integrity code 
Read code 
10037 = Creator only 
1102 = Password owner 
lll> = Any user 
Write code-same options as read code 
Delete code-same options as read code 
Execute code-same options as read code 
Not used 
Initial file size (in tracks) 
First disc address for allocation (in tracks) 
Physical record length (in words) 
Maximum file size (in tracks) 
Logical record length (in characters) for relative rec- 
ord files only 
Key length (in characters) for key indexed files only 


5.18 DEALLOCATE RESOURCE - SVC NUMBER 5l 


@LDM =ARGLST Set M-Register to List Address 
SVC 51 Execute Call 
ARGLST DATA 2 2 Arguments 
DATA JERR Address for Return of Error Code 
DATA JLUNO Address for Logical Unit Number 
JERR Bos ] 0=Ok, >O=error 
JLUNO DATA n Logical Unit for Released Resource 


The Deallocate Resource SVC removes an assignment of a device or file from 
a user program at runtime. The released resource may have been allocated 
to the job step initially by JCL or may have been allocated during runtime 
with a SVC 49 call. 


The input parameters consist of a word for return of error code from DX980 
(0O-Ok, >O=improper LUN), plus a word containing the LUN(1-254) to be 
deallocated. 
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5.19 GET PROGRAM LIMITS - SVC NUMBER 98 


@LDM =ARGLST Set M-Register to List Address 
SVC 98 Execute call 
ARGLST DATA 1 1 Argument 
DATA LIMITS | Address for Limits Depository 
LIMITS BSS 2 Lower and Upper 


SVC 98 is identical to SVC 3 (Get Memory Limits) except that the memory 
limits returned in LIMITS correspond to the area between the last word of 
the user program and the end of the job area. This SVC determines the 
amount of memory remaining for work area beyond the actual program code. 
When using this SVC in conjunction with preplanned overlays, LIMIT (0) 
contains the first word beyond the longest overlay; when used with non- 
preplanned overlays, LIMIT (0) contains the first word beyond the root seg- 
ment. 


5-20 USER START JOB - SVC NUMBER 129 


@LDM =ARGLST ' Set M-Register to List Address 
SVC 29 Execute cail 

ARGLST DATA 1 1 Argument 
DATA JSB _ Address for Job Structure Block 


The User Start Job SVC presents independent job steps to the system for exe- 
cution. The input to this SVC consists of a Job Structure Block (JSB). To 
initiate a multistep job string, the user must issue a separate User Start 
Job SVC for each job step of the string. The JSB for a single job step con- 
sists of a 26 word preamble plus one resource assignment block (JLDT) for 
each resource to be initially assigned to the job step. Refer to the Allocate 
Resource call (SVC 49) for a description of the JLDT. Table 5-8 lists the 
word and bit assignments for the JSB preamble. Jobs may be started from 
the system console or via batch or interactive input through the subsystems. 
All of these methods utilize JCL. Jobs should be initiated in those ways 
rather than through SVC 129. User Start Job should be used only when other 
alternatives are unsatisfactory. If the system detects an error in the struc- 
ture of a job being submitted, it dismisses all previous job steps and aborts 
the job. 
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Table 5-8. 


Job Structure Block (JSB) Preamble Format 


Field Description 


Total length of JSB (for one job step, including all 
JLDT's) 


Flagword 
Last job step in sequence of steps within a job 
0=No (More SVC 129's are forth coming in this 
job) 
1=Yes (This is the last SVC 129 for this job) 
Privileged mode 
0=Unprivileged mode < PROT> 
1=Privileged mode <PRIV> 
Not used 


User1.D. -<userid> (6 alphanumerics in USASCII) 


Job name - <jsname> (6 alphanumerics in USASCI]) 


Job step number within job string (1 to 15) 
Job priority - <jsprty> (1 to 31) 


Number of task priority levels within the job -<nprty> 
(1 to 31) 


User partition size - <jarea> (load module + user buffer) 


Job size -<jearea> (I/O buffers + job internal system 
control area) 


Stack size of initial task TCB and default size for sub- 
sequent tasks - <stksiz> 


Time limit for job step (in seconds); -1 indicates no 
time limit 

Two words, initially zero, for use by DX980 

Load module volume ID - <volume> 


Load module user 1.D. (6 alphanumerics USASCII) - 
<fileid> 


Load module file name (6 alphanumerics in USASCII) - 
<filnam> 


Load module password (4 alphanumerics in USASCII) - 
<pswd> 


JLDT's 
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SECTION VI 
BATCH PROCESSING SUBSYSTEMS 


6.1 GENERAL 


Three separate subsystems provide batch processing capabilities to the 
DX980 user. These subsystems are Batch Input Reader (BIR), Batch Input 
Spooler (BIS), and Batch Output Spooler (BOS). The two input subsystems 
allow submission of user programs through a card reader. These subsys- 
tems accept a data stream of intermixed data and control cards. However, 
the BIS subsystem stores the input information on disc prior to activation of 
the job, whereas the BIR subsystem allows the executing program to read 
directly from the input peripheral device. Similarly, the BOS subsystem 
reads program output from a disc and transfers it to a low speed output de- 
vice such as a line printer. The subsystems may run concurrently as long 
as they each have separate peripheral devices. Normally, the operator 
starts one subsystem and allows it to run continuously. Any of the subsys- 
tems, however, may be stopped at any time. 


The subsystems are structured and invoked in the same manner as a job, 
Each subsystem requires a JCS that identifies the peripheral devices and the 
load module file. The operator activates the subsystem with JCL Job and 
Run commands from the system console, The following paragraphs describe 


the operation of each subsystem and provide examples of batch processing 
sequences, 


6.2 BATCH INPUT READER (BIR) 


The BIR subsystem functions as a single program input stream, That is, 
Lh nw mmr gene wen ele ae wm ert me fant Anta Atwartlier fenen, thn tment Aeneriznc 
LIL Pt Vsti alll LUaAUDS aily a qyuir cu 1tipul Uatla ULL evry L1fUILT1l vile LitVpue UCVLIU Gs 
Therefore, the batch input device may be unavailable to other users until 
that program terminates, The BIR subsystem does, however, decrease the 
I/O overhead associated with spooling. Figure 6-1 illustrates a typical deck 


structure for BIRinput. The following control commands govern BIR pro- 


cessing: 
/7/JOB JCL Job command 
//RUN JCL Run command 
/{DATA BIR Data Control command 
/$ BIR End of Job command 


6.2.1 JOB COMMAND 


The Job command used with BIR is identical to the JCL Job command and 
defines the start of the job. This command is described in Section II of this 
manual, 
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ENTER VIA CONSOLE 
//JOB BIR SYSTEM 
77 RUN BIR 


RUN ASMLGO DSRC=CRI 


{ff 
Y a 
LTS 


fe 
CARDS FOR 
FORTRAN 
PROGRAM 
Ly 


FORTRAN COMPLIER DELIMITER 


FORTRAN PROGRAM DELIMITER 


FORTRAN COMPILER DELIMITER 


PS #RUN FTNLGO DSRC=CRI DEVS=CR1 


NOTE. 1. BIR REQUIRES A CARD READER FOR INPUT 
(B)130751 


Figure 6-1, BIR Input Deck Structure 


6.2.2 RUN COMMAND 


The Run command used with BIR is identical to the JCL Run command and 
defines the JCS that loads and executes the requested Jo0s ‘This command is 
described in Section II of this manual, 


6.2.3 DATA CONTROL COMMAND 


The Data command (//DATA) identifies the start of the user data input. This 
command must be included following the Run command and before the data 
stream whenever data appears in the job input to BIR. The Data command 
for BIR contains only the six character symbol, //DATA,. Other information 
may be included, but BIR ignores that input. Only one DATA command is 
allowed ina BIR job, The data deck must be organized in the order expected 
by the user program, The data deck cannot contain intermixed control cards, 


6.2.3.1 SYSIN ASSIGNMENT. If the JCS identified in the Run command 
contains an assignment to the generic device, SYSIN (/ASSIGN 6 SYSIN.), 
then the input job must contain a Data command, When BIR reads the Data 
command, it deallocates the input device and suspends operation until the 
user program terminates, The user program then executes and is assigned 
the same input device, The program acquires all data from this peripheral 
as it is needed until processing terminates, At that point, BIR reactivates 
and scans the input from the peripheral device for a new Job command, 
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6.2.3.2 DEVICE ASSIGNMENT, If the user job contains an assignment to 
the same I/O device that BIR is using, BIR again deallocates that device and 
suspends processing until the user job completes, For example, if device 
CR1 is assigned as the input device for BIR and a user job desires input 
from that device, then the user job input must also contain a Data command 
following the Run command, plus the associated input data, BIR then pro- 
cesses the input as if the JCS for the job had assigned the input to SYSIN. 
The JCS may contain many assignments to either SYSIN or the BIR input de- 


vice, All such assionm 


e s 
ents designate the same device. 


ee ee ee 


6.2.4 END OF JOB COMMAND 


The End of Job command (/$) follows the last data input of the user program 
and precedes the next Job command in the input stream. This command re- 
sets BIR for the next job and signals the end of the current job. 


6.3 BATCH INPUT SPOOLER (BIS) 


The BIS subsystem receives input from the assigned peripheral device and 
stores that input on a disc prior to the start of the related program. This 
operation is called spooling, When the program starts, it can access data 
from the high speed disc, rather than from the low speed input peripheral. 


This system allows shorter program execution time and submission of other 
jobs while the first job is executing. Figure 6-2 illustrates a typical deck 
structure for BIS input. The following control commands govern BIS pro- 


cessing: 
//JOB JCL Job command 
//RUN JCL Run command 
//DATA BIS Data Control command 
/$ BIS End of Job command > 


6.3.1 JOB COMMAND 


The Job command used with BIS is identical to the JCL Job command and de- 
fines the start of the job, This command is described in Section II of this 
manual, 


6.3.2 RUN COMMAND 


The Run command used with BIS is identical to the JCL Run command and 
defines the JCS that loads and executes the requested job, This command is 
described in Section II of this manual, 


6.3.3 DATA CONTROL COMMAND 


The Data command (//DATA) identifies the start of the user data input. This 
command must be included following the Run command and before the data 
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ENTER VIA CONSOLE 
//JOB BIS SYSTEM 
// RUN BIS 


pais JOB DELIMITER 
ere DELIMITER 


[1 4 DATA A 
li RUN ASMLGO 


~~ //RUN ASMLGO DSRC=SYSIN 


fp BIS JOB DELIMITER 
DECK 


f= ~~ 7/RUN FTNLGO DSRC=SYSIN 
[1 (NO FORTRAN DATA CARDS) 


pe BIS JOB DELIMITER 


Pe FORTRAN PROGRAM DELIMITER 


// 71 DATA A 
[1 77 RUN FTNLGO 


we 7/RUN FTNLGO DSRC=SYSIN DEV5=SYSIN 


JS wentiries DECK FOLLOWING AS DSRC FOR COMPILER JCL 


1. BASED ON A MINIMUM CONFIGURATION AND SUPPLIED FTNLGO SEQUENCE 


NOTES. 
BIS REQUIRES CARD READER FOR INPUT 


(B)130752 2; 
Figure 6-2. BIS Input Deck Structure 


Change 1 6-4 Digital Systems Division 


(°) 
rig 943005-9701 


stream whenever data appears in the job input to BIS. More than one Data 
command may appear in the input to BIS, Each Data command is in the 
iors: 


//DATA,[<p1>],[<p2>]. 


6.3.3.1 PARAMETER <p,s. Parameter <p,s is optional. If supplied, 
this field contains the letter J, If BIS detects the letter J in this field, it 
spools all cards following the Data command onto the disc including any sub- 
sequent Data commands, In this mode the End of Job command (/$) is the 
only job delimiter, If the letter J is not supplied in this field, BIS interprets 
subsequent Data commands as well as End of Job commands as data deck 
delimiters, This allows the data input to be subdivided for use by different 
portions of the program, If the Data command contains a J entry, it must | 
be the last Data command in the input stream since the remaining cards are 
not interpreted, . 


6.3.3.2 PARAMETER. p,>. Parameter <p,s specifies the type of data 
conversion to be used during spooling, Three entries are possible for this 
parameter: 


® A The letter A specifies conversion of the input data to USASCII 
before storing the data on disc. 
B The 


L lette 
before storing the data on disc. 


44 
LL 


e D The letter D specifies storing the data directly on disc as itis 
read from the input device, 


If this parameter is not included, BIS defaults‘to converting the input data 
to USASCII code for storage on the disc. 


6.3.3.3 ASSIGNMENTS, All assignments for input data under BIS must 
be made to SYSIN, BIS does not allow an assignment to the device that it is 
using. Programs may have more than one assignment to SYSIN. Hach as- 
signment to SYSIN must have'a separate data deck preceded by a Data com- 
mand, The input data sets must be organized in the same order as their 
respective assignments, The first assignment to SYSIN in the JCS reads 
the first data set, the second assignment reads the second data set, etc. 


6.3.4 END OF JOB COMMAND 


The End of Job command (/$) follows the last data input of the user program 
and precedes the next Job command in the input stream, This command re- 
sets BIS for the next job and signals the end of the current job, Ifa //DATA 
J. Data command occurred in the job, the End of Job command is the only 
command that terminates data input. 
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6.4 BATCH OUTPUT SPOOLER (BOS) 


The BOS subsystem allows the user program to store output data on a high 
speed disc file during program execution, The subsystem then retrieves 
the data from the disc when the program is complete and writes the data on 
the designated output device. This output spooling feature can be used only 
if a System Output Queue (SOQ) file is installed on the system disc, The 
operating system verifies the existence of SOQ at each initial program load- 
ing (IPL). If SOQ is available, then any job may use the output spooling 
feature by assigning the output LUN to SYSOUT. All data written to 
SYSOUT is stored on the disc until the job string terminates, At that time 
if BOS is running and not busy, it begins to output the data to the assigned 
device. If BOS is not running, it will print out the data as soon as it is ac- 
tivated with the Job and Run commands, 


A job step may assign up to 26 LUNs to SYSOUT; however, the total number 
of LUNs assigned to SYSOUT in a job string is also limited to 26. When the 
data is spooled, it is separated on the disc according to LUN. Therefore, 
when the data is printed out following completion of the job, all data written 
to one LUN will be printed before any data is printed that was assigned to a 
different LUN. This system provides a degree of organization to the output 
data that cannot be achieved by assigning multiple LUNs to the same output 
device directly. In that case the data is printed chronologically as produced 
by the program. When the data is spooled, it can be divided into functional 
groups. 


6.5 BIR AND BIS EXAMPLES 


1. //JOB JBNAME USERO1 
//RUN JSBKEY 
/$ 


The JOB command specifies a user job with jobname JBNAME under userid 
USEROI1. The JSB file defaults to the standard system JSB file under DX980. 


The RUN command directs the system to retrieve the JSB with the name 
JSBKEY from the system JSB. 


2. //JOB JBNAME USERO1 FILE=(1, USER2, FILEX) 
//RUN JSBKEY 
/$ 


This example is identical to the previous example except that the JSB file is 
on disc unit number one with userid USER2 and filename FILEX, 


3. f/JOB JBNAME USEROI1 
//RUN JSBKEY INPUT=CR2 #£FILE=(USER3, FILEZ) 
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The keyword INPUT, established at JCL translation time, is overridden 
with device assignment CR2 representing card reader number two. CR2Z is 


not the batch input peripheral. Keyword FILE is overridden to specify a 
specific disc file, 


4, //JOB JBNAME USERO1 
//RUN JSBKEY INPUT=SYSIN 
//DATA A 

data 
/* 
/$ 


Input is from the device assigned to the batch subsystem. If executed under 
BIS, data is converted to USASCII before spooling. BIR ignores the letter A 
in the Data command. 


5. //JOB JBNAME USERO1 
//RUN JSBKEY INPUT=CRI1 
//DATA ,, A 

data 
/* 
/$ 


If CRl is the system input device, BIS will not recognize this job, BIR ig- 
nores the letter A in the Data command, 


6. //JOB JBNAME  USERO1 
//RUN JSB002 INPU T=SYSIN 
//DATA J,A 
data 
/* 


//DATA B 


(listing continued on next text page) 
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/$ 


For BIS the //DATA B card is spooled to disc as data because of the 'J' on 
the first //DATA card, BIR also ignores the //DATA Bcard, because the 
first Data command suspended the system to wait for job termination (/$). 


6.6 BIS EXAMPLE 


//JOB JBNAME USERO1 
//RUN JSBOO1 INPUT1=SYSIN INPUT2=SYSIN 
//DATA A 


ee (a) 


Data (a) will be with INPUT 1 and data (b) will be with INPUT 2. 
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SECTION VII 


INTERACTIVE TERMINAL SUBSYSTEM 


7.1 OVERVIEW 


The Interactive Terminal Subsystem (ITS) is that portion of DX980 that sup- 
ports interactive peripherals such as teleprinters and full duplex CRTs. In 


J e e s s = e e 
particular, a single version of ITS allows intermixing in any configuration of 


the following terminals: 
e Model 733 ASR 
® Model 733 KSR 
° Model 33 ASR 
® Full duplex 912 CRT 


The ITS and the terminal user communicate with input commands and output 
data or messages, The primary difference in the type of terminal, from the 
terminal user's viewpoint, is the amount of information that can be displayed. 
Teleprinters provide a single display line whereas CRTs provide up to 24 
display lines, | 


71,1 CRT DISPLAYS 


Under ITS a full duplex CRT may be supported either as a single line ora 
multi-line device. Single line or multi-line support is determined when 
building the PDT for the CRT atIPL time. If single line mode is selected, 
the CRT functions exactly as ateleprinter. If multi-line support is specified, 
on-screen editing allows convenient operations not possible with a teleprint- 
er. inthis section references to a CRT applies specifically to a CRT oper- 
ating in multi-line mode. The CRT should be regarded as a teleprinter if 
single line mode is to be used. 


The ITS and the terminal user communicate using input commands and output 
data or messages, The first line of a CRT screen is dedicated to commands 
and error messages. The remainder of the screen displays data. The 
operator must enter requests toITS inline 1. Each request (command) to ITS 
must be followed by a period or have blanks (spaces) for all remaining posi- 
tions inline 1. Depending on the type of request, the operator may also 
enter lines of data prior to notifying ITS that the screenis ready for process- 
ing. The operator can modify data on the screen with the cursor positioning 
keys in conjunction with the data keys. Any data change is echoed to the 
screen and stored simultaneously in the CRT buffer in the main memory. 

The effective screen size for on-screen editing can be specified within a 
range of 2 to 24 lines. The size impacts the amount of main memory re- 
quired to support the terminal since each terminal must have a main memory 
buffer of 40 words per display line. When the operator has completed the 
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message on the screen, he transmits the message to the system by pressing 
carriage return (CR). 


7.1.2 TELEPRINTERS 


Communication between the ITS and a teleprinter is in a one-line format. 
Each input line must be entered completely before notifying ITS to accept 

the input. ITS responds with data one line ata time. The operator keys in 
a request to ITS at the terminal and terminates it by depressing carriage re- 
turn (CR). If terminal data is required to complete the request, ITS returns 
control to the terminal and rings the bell. At that time the user enters a 
data line and presses CR. This procedure continues until the request is sat- 
isfied. Mistakes made during command or data entry can be corrected by 
pressing CRTL H repeatedly to backspace until the carriage is positioned 
over the character inerror. Starting at that point, the remainder of the line 
can be reentered correctly. When the operator presses the first reentry key, 
the DX980 terminal handler issues a line feed before echoing the character. 
Thus, the corrected data appears immediately below the original data, If 
this technique is employed several times, the data line resembles a stair- 
case, Pressing CTRL N displays the entire data line ona single line, If the 
line is uncorrectable, the terminal user can start over by pressing RUBOUT 
and reentering the line. 


7.1.3 ITS TERMINAL ASSIGNMENTS 


ITS runs as a privileged program and can be activated via the RUN command 
from the system console. (The system console can be any data terminal de- 
vice.) The terminal assignments for ITS are normally incorporated into the 
JCL sequence for ITS, but can be overridden in the Run command at submis- 
sion time by specification of Ti=<devnam>. For this notation, iis in the 
range of 1 through the number.of terminals at the installation and <devnam> 
is the mnemonic representation for the subject terminal, Assignments may 
be made to the system console (SC) and to the dummy device (DUMMY). Any 
program, including ITS, can assign the system console as one of its devices, 
Thus it can serve a dual purpose both as a system console and as a user ter- 
minal, When assigned to a program, the console displays the message 
USER MODE to notify the operator that the console has switched modes, At 
that time the operator can use the console as any other terminal, Pressing 
CTRL O switches the console back to system mode, After completion of the 
system duties, the console can be switched back to user mode with CTRL U. 
Assigning a terminal to DUMMY is a useful technique for starting ITS when 
one of the normally active terminals is inoperative, This assignment affect- 
ively deletes the corresponding assignment in the original JCL sequence, 
The following sample entries illustrate initiation of ITS from the System Con- 
sole: 


(1) //RUNITS Start ITS with default assignments, The 
'//" is displayed in response to pressing 
the escape key (ESC), 
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(2) //RUNITS T1=SC | Start ITS with an assignment to the sys- 
tem console in addition to the default as- 
signments to other terminals, T1 could 
have been given a default assignment of 
DUMMY in the expanded JCS which would 
require positive action for assignment to 
the system console, 


(3) //RUNITS T1=SC, Same as example (2) except that the ter- 
T3=DUMMY minal normally assigned to T3 is inop- 
erative. 


7.1.4 ITS MEMORY REQUIREMENTS 


The memory requirements of ITS vary depending upon the number of termi- 
nals, the type of terminals, and whether the terminals are going to use the 
Remote Job Entry capability of ITS. ITS requires approximately 6000 words 
of JAREA, plus 125 words of JAREA per (one-line) terminal and 150 words 
of JEA per terminal. If the terminal is a multi-line CRT, then 40 words per 
display line must be added to the JAREA. If the terminal is going to use the 
Remote Job Entry capability, then 500 words must be added to the JAREA 
and 350 words must be added to the JEA. 


7.1.5 REMOTE TERMINALS 


After ITS is activated, a read is issued to each assigned terminal, This 
command rings the terminal bell and activates the terminal for input. If the 
assigned terminal is connected through a telephone data set, the data set is 
conditioned so that the terminal is immediately activated when the telephone 
connection is made, The procedure for establishing communications between 
a telephone dataset and a terminal equipped with an acoustic coupler is as 


f£A711 AVtrrae 
LULLUW Oe 


1) Dial the assigned number and wait for the data set tone (a high pitch 
squeal), | 


2) Plug the handset into the acoustic coupler (the acoustic coupler 
must have the Mode switch set on 'Full Duplex"; the terminal Mode 
switch must be set to ''Line''), 


3) Terminal is ready for use, 


7.1.6 LOGON 


When communication is established between ITS and a terminal, the termi- 
nal user must enter a Logon command to gain access to ITS facilities, The 
format of the Logon command is as follows: 


LOGON <userid> <acctno> 
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The Logon command converts a terminal from the inactive state to the ready 
state, When the terminal is in the ready state, all the services of ITS be- 
come available to the user. The notation <userid> and <acctno> correspond 
to user identification and account number respectively. Depending on the 
installation, a future enhancement to ITS will use three parameters for val- 
idation against a file of acceptable combinations and recording along with the 
elapsed time of an ITS session for accounting purposes, The present version 
of ITS requires them for syntactic validation, The <userid> field is limited 
to six characters, the first of which must be alphabetic. The <acctno> field 
is a positive integer that must be less than 32, 768. All ITS command op- 
erands may be separated by a single comma, one or more blanks, ora 
comma and one or more blanks, 


| 7.1.7 OTHER ITS COMMANDS 


After the Logon command has been validated, the message 'READY' is dis- 
played on the terminal, At this point the following commands are valid 
(brackets denote optional fields): 


e LOGOFF 


e EDIT FILE=(<volumes, <fileid>, <filnam> [,< pswd>}) 
[LRECL=<lIrchar>] 


e ENTER FILE=(<volume>, <fileid>, <filnam>[,<pswd>]) 
[LRECL=<lrchar>] [EXTEND] 


e JOB <jsname> <userid> [FILE=(<volume>,<fileid>, <filnam>[,< pswd>])] 
@ RUN <jcsnam>... 

e STATUS [<jobnum>| | 

e DELETE FILE = (<volume>, <fileid>, < filnam>[,<pswd>] ) 


The Edit and Enter commands gain access to the Interactive File Editor 
(IFE). The Job and Run commands enter the Remote Job Entry (RJE) facility. 
The Stat command accesses the Computer Status Display (CSD) facility. The 
Logoff command returns the terminal to the inactive state. 


7.2 INTERACTIVE FILE EDITOR 


The Interactive File Editor (IFE) is an integral part of the Interactive Ter- 
minal Subsystem (ITS). It supports teleprinters.and full duplex CRTs, IFE 
allows the user to display, insert, delete or replace records from the file, 

as well as create an entirely new file from the editing terminal, Two utility 
programs, BLDEDT and DXCOPY, construct the file for editing, and trans- 
fer the edited file back to the user file. Two editing commands, ENTER and 
EDIT, add or delete records from the file. Figure 7-1 illustrates the data 
transitions that may occur within the scope of file editing, IFE operates 

only on key indexed files. The file must be constructed such that the keys are 


Change 1 7-4 Digital Systems Division 


943005-9701 


ee 


CASSETTE OR 
CARD INPUT 
DATA 


DXCOPY 
(UTILITY) 


BLDEDT 
(UTILITY) 


BLDEDT 
(UTILITY) 


LINKED SEQUENTIAL 
FILE (NO KEYS) 


DNXCOPY 


(UTILITY 

DXCOPY 

(UTILITY) 
KEY INDEXED 
FILE WITH CON- | KEY INDEXED FILE 
SECUTIVE AND BLDEDT ; WITH NONCONTIGUOUS 
CONTIGUOUS EDIT EDIT KEYS AND UNLABELED 
KEYS FILE (UTILITY) FILE RECORDS 


(COMMAND nna) | 
(COMMAND) 


ENTER 
(COMMAND) 


KEYBOARD 
INPUT 


(A)130103 
Figure 7-1, Interactive File Editor Transitions 


the record numbers and the data is the source text, The first record must 
have a key of '1", the second record "2", etc... Hither of two methods can 
create a file in this form, The first method is a utility program name 
BLDEDT, BLDEDT accepts input from a sequential access source and 
copies the input data into a key indexed file suitable for use by IFE, The 
second method is to use IFE to create a suitable edit file. The Enter com- 
mand causes IFE to create a new key indexed file and accept the new text 
from the user terminal record by record, Adding EXTEND to the Enter 
command causes IFE to add new input to an existing edit file. Once a suit- 
able edit file is created, IFE may be used to modify it by inserting, replac- 
ing, or deleting specified records, This is accomplished with an Edit com- 
mand, While editing, the record number keys in the Edit file become 
nonconsecutive due to deletions and record insertions without keys. The 
keys (or record numbers) may be cleaned up by recopying the file using the 
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BLDEDT utility. When editing is complete, the user may employ the 
DXCOPY utility with the ''NOKEYS" option to transcribe the key indexed file 
into a linked sequential file. However, in most cases the edited material may 
be left in the key indexed file. The Assembler, the Compiler and other pro- 
grams accept input from a key indexed file resulting from IFE. 


When using IFE the escape key (ESC) stops input, output, or processing and 
returns control to the terminal. . 


The IFE command set can be separated into three basic catagories: file 
commands, edit commands, and state transition commands, Each command 
is independent of the type of terminal (teleprinter or CRT) that originated 
the command, Special exceptions are noted as they are encountered in the 
following command descriptions, 


7.2.1 FILE COMMANDS 


The IFE File commands assign, create or extend files for use by the IFE, 


7.2.1,1 EDIT FILE, The Edit File command (EDIT FILE) directs IFE to 
assign an edit file to the requesting terminal for interactive file editing. 
The file must have been previously created by the Build Edit File (BLDEDT) 
program or by an Enter File command, The Edit File command is per- 
missable only when the terminal is in the Ready state. The format for the 
Edit File command is as follows. The interpretation of each parameter is 
identical to that specified in the JCL description in Section II of this manual. 
The default value for LRECL is 80 characters, 


EDIT FILE=(<volume>, <fileid>, <filnam>[,<pswd>]) [LRECL=<Irchar>] 


After IFE has processed the Edit File command, it converts the terminal to 
the Edit state and returns the first record(s) in the file to the terminal, At 
this point, the user may enter edit commands or state transition commands 
to control further processing, 


7.2.1.2 ENTER FILE. The Enter File command directs IFE to create a new 
file or extend an existing file using data from the terminal. The file is a key 
indexed file. If the file is being created by the Enter File command (EXTEND 
option not specified), then the maximum number of tracks allowed for the 

file is 25 which accommodates about 1200 lines of text. The access codes of a 
file created with the Enter File command are (Any, Any, Any, None) unless 
a password is specified in the command in which case the access codes are 
(Any, Pswd, Pswd, None). As each record is entered into the file, IFE as- 
signs a record number to it that can be used in subsequent editing sessions. 
Enter File generally used for manual entry of data as with key-to-disc sys- 
tems. Operation with this command is identical when using either a tele- 
printer or CRT as a terminal. Control returns to the terminal after each 
record is processed and awaits entry of the next record. For this command 
line 1 of a CRT contains data rather than commands. 
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The format for the Enter File command is as follows, The <fileid> param- 
eter must have been previously defined via the CATLOG utility from the sys- 
tem console. The<filnam> parameter may be new if the command creates a 
new file. Default value for LRECL is 80 characters and defines the line- 
width for the terminal, 


ENTER FILE=(<volume>, <fileid>, <filnam> [,<pswd>]) 
[ LRECL=<Irchar>] [ EXTEND] 


The Extend parameter of the Enter File command extends previously created 
files by adding records to the end. As each record is added, IFE assigns the 
next consecutive record number to it as with newly created files, 


After IFE has processed an Enter command, it returns to the user and 
awaits entry of data records, The length of each input record, keyed in at 
the terminal, is controlled by the carriage return (CR) ona teleprinter or 
number of characters per line ona CRT, The record is padded out with 
blanks if the record length is less than LRECL, and is truncated if record 
length is greater than LRECL. A zero length record (CR only) causes IFE to 
stop accepting records to putin the file, and IFE returns to the Ready state. 


7.2.1.3 DELETE FILE. The Delete File command directs IFE to delete a 
file. The file is deleted if the integrity code which ITS is running under 
allows the deletion. 


7.2.2 EDIT COMMANDS 


The basic format for all Edit commands plus the first two operands is as 
follows: | 


{command} [RN=][+]M [, N] 


The braces,} }, indicate a mandatory field containing the command or opera- 
tor. The brackets, [ ], indicate options. The parameter, M, is either an 
absolute or relative record number depending upon the presence or absence 
of a preceeding [RN=] field. The absolute record number indicator, [RN=], 
directs IFE to select record number M from the record numbers that were 
originally recorded in the edit file. Since the record numbers start at 1 and 
are all positive, a minus sign for M does not have a general interpretation 
for absolute record numbers, However, two special cases exist for starting 
in front of the first record in the file (Beginning of File or BOF), or after the 
last record (End of File or EOF). The two cases are: | 


RN=0 Positions file at BOF 
RN=- 1 Positions file at EOF 


Any other absolute record number for M must correspond to a record num- 
ber that exists in the file. If not, the message ''RECORD NOT FOUND" is 
displayed following the command, 


ee 
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If the [RN=] field is not used, then M specifies a relative record position, 
That is, it uses the current record position as a point of reference within 
the edit file to access other records, The current record is the first data 
line displayed on a CRT or the last data line that was printed on a teleprinter, 
Specification of relative record position within a command directs IFE to 
move forward (+) or backward (-) M records. If the sign field is not present, 
+ is assumed, The current record is defined as relative record number l, 
the next record is record 2, etc. If the sign field specifies.a minus number, 
-~l refers to the record immediately preceeding the current record, -2 to the 
record preceeding -1, etc. If0 is specified as a relative record number, 
IFE converts it to +l. The one exception to this rule is for the Insert Record 
[ command for CRTs. See examples for that command. The parameter [N] 
specifies the number of records to be processed. Processing occurs after 
the new file position has been established. If not specified, [N] defaults to l. 
The following examples illustrate the use of the M parameter and its associ- 
ated fields: 


e RN=1 Position at record number 1 in the edit file 


e RN=-3 Error: An edit file cannot contain a record number 
of -3 
e +1 Position at the current record: Ona teleprinter this 


specifies the last record printed, Ona CRT it speci- 
fies the first data line displayed (the first data line is 
actually line 2 on the screen, since line 1 is reserved 
for commands) 


e l Same as +l 


e -3 Position at the record that is three records before 
the current record. 


e RN=5, 2 Position at record number 5, then process two records, 


® 3,1 Position at the record that is two records beyond the 
current record, then process one record 


e 3 Same as 3, l 


7.2.2.1 FIND RECORD: F[RN=][+]M. This command establishes a new 
current record and displays it at the terminal, If the terminal is a CRT, it 
fills the screen with records from the file starting at the new current record, 


7.2.2.2 REPLACE RECORD: R[RN=][+]M[,N]. This command establishes 
a new current record and replaces N records in the file with new records 
entered from the terminal. If the new replacement record has a pound sign 
(#) in column 1, it deletes the corresponding file record but does not re- 
place it with a new record. This character allows simultaneous deleting and 
modifying of replacement records. After the replacement process is com- 
plete, the record immediately following the last record replaced becomes the 
current record. 
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When this command is entered from a teleprinter, IFE returns control to the 
keyboard to accept N records (one at atime). Each time a record is entered, 
IFE deletes the corresponding record from the file and, unless a # is in 
column 1, replaces the old record with the new replacement record, as en- 
tered. If a null length record is transmitted (user enters only a carriage re- 
turn), then IFE terminates the replacement process and returns control to 
the keyboard to accept a new command. The Replace command has a slightly 
different interpretation when entered from aCRT. The records displayed on 
the screen become the replacement records even if they originally came from 
the file. This feature allows multiline editing from aCRT. The records 
displayed on the screen by any previous command can be modified on the 
screen and then used as replacements for the corresponding records in the 
file. Since the new replacement records come from the screen image, this 
command should not be used immediately following a List command which 
displays information other than just the records from the file. 


The absolute record number option, [ RN=], is not valid from a CRT. 


The following examples illustrate the use of this command: 


e R 1,3 Replace the current record and the two successive 
records. When entered from a CRT, the replacement 
records come from data lines 1, 2, and 3; when entered 
from a teleprinter, controi returns to the terminal 
three times to accept three replacement records. On 
any type of terminal, a replacement record with # in 
column 1 deletes the corresponding file record and 
does not add the replacement record. 


e R RN=I, 3 Same as R 1,3 except that the records are the file rec- 
ord with record number i and the two successive file 
records. This command is not valid from a CRT. 


co) R 5,4 Replace the file record which is 4 records beyond the 
current record and the three following records. When 
entered from a CRT, the replacement records come 
from data lines 5, 6, 7, and 8; when entered from a 
teleprinter, control returns to the terminal four times 
to accept four replacement records. 


7.2.2.3 INSERT RECORD: I[RNE=][+]M[,N]. This command establishes 
a new position and inserts N records following the new current record, The 
insertions can be terminated short of N records from a teleprinter by trans- 
mitting a null line. After processing is complete for the Insert Records 
command, control returns to a teleprinter with the print head in position one 
and the bell rings. When executed ona CRT, the displayed data opens at the 
insertion point to make room for inserting records. A# appears in column 
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one of each insertion record and the remainder of the record contains blanks, 
Insertion of records from a CRT is accomplished with a user entered 
Replace Record command after the new records have been keyed into the data 
lines that were opened for insertion, Each # must be eliminated before exe- 
cuting the Replace Record command, or the record will not be inserted. 

The absolute record number option is not valid froma CRT. The following 
examples illustrate the use of this command: 


e 11,3 Insert three records after the current record. When 
entered from a CRT, the current record is maintained 
on data line l; data lines 2, 3, and 4 are blanked out 
except for a # in column 1, The record that was pre- 
viously displayed on data line 2 is in data line 5, data 
line 3 moves to data line 6, etc. The user-entered Re- 
place Record command that would normally follow this 
command is R 2,3. This accomplishes the actual in- 
sertion of the records (that the user has keyed into data 
lines 2,3,and 4) over the top of the lines which IFE dis- 
played with the # in column 1. When entered from a 
teleprinter, IFE returns control to the terminal three 
times to accept three insertion records. If the user 
enters a null line (enters only a carriage return), then 
the insertion process is terminated and IFE requests a 
new command. 


e LRN=S5.3 Insert three records after record number 5. Not valid 
from a CRT. . 
e I RN=0,2 Insert two records before the first record in the file. 


Not valid from a CRT. 


e 10,2 Insert two records after the current record. If entered 
from a CRT, data lines 1 and 2 are. blanked out except 
for a # in column 1; and if the normal Replace Record 
command of R 1,2 is then entered, the records actually 
get inserted before the record that is considered the 
current record at the time this I 0,2 command is en- 
tered. In this way, records may be inserted before the 
first record in the file. 


e I -1,4 Insert four records after the record which precedes the 
current record. Not valid from a CRT. 


NOTE 


Since, ona CRT, this command is normally followed 
by a Replace Record command (which gets replacement 
records from the lines on the CRT exactly as they are 
displayed), the Insert Record command should not be 
used immediately following a List Record command. 
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7.2.2.4 DELETE RECORD: D[RN=][+]M[,N]. This command finds a new 
current record and deletes N records starting with the new current record. 
After the appropriate records are deleted, the current record is then changed 
to be the record which follows the last deleted record. If records are deleted 
from a CRT screen, the displayed data closes to reflect the new contents of 
the edit file. The following examples illustrate the use of this command. 


e Di1,2 Delete the current record and the record which follows 
it, When complete, display the new current record. 


& D RN=5, 3 Delete record number 5 and the following two records. 
e D RN=O, 4 Delete the first four records of the file. 


7.2.2.5 FIND STRING: FS[RN=][+]M [, N][C1:C2]/STRING/. This com- 
mand finds a new current record and searches N records for the subject 
string, The search for the string occurs between record columns Cl and 

C2. A slash within a string is denoted by a double slash, i.e. //=/. The 
Find String command is used in the same manner as Find Record except that 
IFE searches for an occurrence of the specified string within the record 
limits specified. If Cl and C2 are not specified, IFE searches each record 
between column 1 and LRECL. The limits Cl and C2 restrict the search to 
fewer than LRECL characters to eliminate unwanted matches and to decrease 
the search time. The following examples illustrate the use of this command: 


e FS RNel, 10 /ABC/ Search through ten reco starting 
| with record number 1 for the string 
ABC, Establish the record contain- 
ing ABC as the new current record. 
If the string is not found, display 
"STRING NOT FOUND! message and 


maintain the original current record, 


r cords etartin 


e FS RN=10,50 1:10 /XY//Z/ Search through fifty records starting 
with record number 10 for the string 
XY/Z. Limit the search to record 
columns one through ten, 


7.2.2.6 REPLACE STRING: RS [RN=][+]M [, N][C1:C2]/STRING]/ 
/STRING2/. The Replace String command is identical to Find String except 
that STRING2 replaces the first occurrence of STRINGI. If the lengths of 
STRING1 and STRING2 are different, the insertion is made and the record 
length is adjusted accordingly, If the adjusted record length is greater than 
LRECL, the record is truncated to LRECL, If the new record length is 
shorter than LRECL, the record cioses and fills with blanks from the right. 
The use of consecutive slashes for STRING2 denotes a null string and deletes 


Change 1 7-11 Digital Systems Division. 


fe) 
rig 943005-9701 


STRINGI1 from the record. The following examples illustrate the use of this 
command: 


e RS1,10 1:20 /ABC/ /DEF/ Search through 10 records starting 
with the current record for the 
string ABC, If ABC is found, sub- 
stitute the string DEF, otherwise 
display the message: 'STRING NOT 
FOUND", Limit the search to col- 
umns 1 through 20, 


e RS RN=I, 10 /ABC/ // Search through 10 records starting 
with record number 1 for the string 
ABC, If ABC is found, substitute 
a null string, close up the record 
and fill with blanks from the right. 
Otherwise, display the message 
"STRING NOT FOUND", 


7.2.2.7 REPLACE ALL STRINGS: RA[RN=][+]M [, N][C1:C2]/STRINGI / 
/STRING2/. Replace All Strings is identical to Replace String except that 
STRING2 replaces every occurrence of STRINGI1 in the subject records, The 
current line is relocated to the record which follows the N lines searched. 


7.2.2.8 LIST RECORD: L[RN=][+]M[,N]. This command establishes a new 
current record and lists N records starting at that point. When the listing is 
complete, the current record remains at the first of the N records listed. 
The format of the listed records is as follows: 


1. If the record has a record number associated with it (the record was 
not inserted with an Insert Record command since the last time the 
file was built), then the record number (maximum of four digits) 
followed by a separator blank and the record are displayed. The rec- 
ord is truncated on the right to fit the display line. 


2. If the record has no associated record number, then five blanks and 
the record are displayed. Again, the record is truncated on the right 
to fit the display line. 


The List Record command is intended for low volume listing and is, there- 
fore, a relatively slow operation. For high volume listing, use the LSTEDT 
utility . 


7.2.3 STATE TRANSITION COMMANDS 


The state transition commands permissable in the edit state are Stop and 
Logoff. Stop returns the terminal to the ready state, Logoff returns the 
terminal to the inactive state. No state transition commands are permissible 
from the enter state. The only option available to change states is a null 
transmission which switches the state from enter to ready. 
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7.3 REMOTE JOB ENTRY 


The Remote Job Entry (RJE) facility in ITS provides interactive access to the 
job management system of DX980 through a user terminal. RJE accepts two 
basic commands: Job command and Run command, Both commands are 
valid from the ready state only. 


72.3.1 JOB COMMAND 


The Job command is optional when submitting a job via ITS. However, if it 
is specified, it must immediately precede a Run command, The format of 
the Job command from ITS is identical to that from any other system source, 
If the Job command is not supplied, the default values are as follows: 


e <jsname> - <userid> from Logon command 
e <userid> - <userid> from Logon eee | 
e <devnum> - 1, corresponds to DISC] 

e  <fileid> - SYSTEM 

e <filnam> - SJCBFL, the system JCL file 


e <pswd>- none 


7.3.2 RUN COMMAND 


The Run command is required to start a job from ITS, The format of the 
Run command is identical to that from any other source. One additional op- 
tion available to ITS users is the assignment of the user's terminal to the 
job being started, This can be very useful if the terminal is located at a re- 
mote site. The user can assign the terminal through a device assignment of 
TERMIO, Expanded JCL sequences allow changing device assignments through 
the use of keywords, Any device keyword can be assigned to the psuedo- 
physical device name, TERMIO, ITS substitutes the true device name for 
TERMIO before submitting the job. For example the expanded JOL may 
specify: DEVICE:=INDEV. In the Run command the user may state: 
INDEV=TERMIO, In this case ITS substitutes the true device name for 
TERMIO, That device name may be CRT3 or any other device previously 
assigned to TERMIO, The pseudo-physical device name, TERMIO, must be 
specified in the Run command, It may not be specified in the expanded JCL. 
As many device names as desired can be assigned to TERMIO and each name 
is converted to the subject terminal, When the job is started, ITS releases 
the terminal until the job is complete. At that time ITS reacquires the ter- 
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minal and activates it for further communication, The following example 
illustrates the device assignment option of the Run command: 


RUN XA SRCDEV=DISC1, SRCFIL=(USER0O1, MYPROG); 
LSTDEV=TERMIO, ERRDEV=TERMIO, OBJDEV=PTP1 


Run the assembler with input from a 
file with file name ''MYPROG' 
(possibly created and edited using 
IF E). Assign listings and error 
messages to my terminal (TERMIO) 
and assign the object output to the 
paper tape punch, 


7.4 COMPUTER STATUS DISPLAY 


The Computer Status Display facility in ITS determines system status either 
before or after submitting a job through the RJE facility, Entering the fol- 
lowing command at the terminal displays the status of all programs in the 
system: 


STATUS 


The statistics for all steps within a specific job can be displayed by entering 
the command in the following form: 


STATUS <jobnum> 


7.5 ITS ERROR MESSAGES. 
ITS error messages fall generally into three catagories. 


A. Messages of the form: 


ERROR NNNN where NNNN is a four digit error number. These 
error messages are given only by the Remote Job Entry and Com- 
puter Status Display facilities. The error numbers are passed to 
ITS by DX980 and are documented in Appendix A. 


B. The message: 
INSUFFICIENT MEMORY, TRY AGAIN LATER 


This message is given only by the Remote Job Entry and Computer 
Status Display facilities and indicates that there is not enough avail- 
able memory in the ITS area to perform the request. If several 
terminals are currently using ITS, then more memory may be avail- 
able later as operations for other terminals are completed. 
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IFE Error Messages: 


(1) . INVALID COMMAND 
(2) .DISC OFFLINE 

(3) . INVALID FILE TYPE 

(4) .INVALID ARGUMENT 

(5) .ARG COUNT ERROR 

(6) .ARG RANGE ERROR 

(7) .RECORD NOT FOUND 

(8) .STRING NOT FOUND 

(9) .STRING TOO LONG 

(10) .INSUFFICIENT MEMORY 
(11) . FILE ASSIGN ERROR 
(12) . FILE BUSY 

(13) .FILE FULL 

(14) .FILE READ ERROR 

(15) .FILE OPEN ERROR 

(16) . FILE 1/O ERROR 


In most cases the user can readily discover the problem causing the 
error and then reenter the command correctly to continue. However, 
messages (15) and (16) may be given in response to the user submis- 
sion of the EDIT or ENTER commands and if this occurs the user 
must enter STOP or LOGOFF before re-submitting the desired EDIT 


or ENTER command. 
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SECTION VIII 
UTILITY PROGRAMS 


8.1 GENERAL 


A comprehensive set of programming support language processors and utility 
programs is available for use with the operating system. Sequences of ex- 
panded JCL supplied with a system reside on the system disc in the file ad- 
dressed as FILE=(1, SYSTEM, JCLSRC). Appendix B contains a sample listing 
of some expanded JCL sequences. When specified in a Run command, these 
standard JCL sequences perform the language processors and utilities. Some 
of these programs, such as the FORTRAN compiler, are not unique to the 
DX980 operating system. These programs are documented in separate man- 
uals, This section provides information concerning the use of these programs 
as they apply tc the DX980 operating system, 


8.2 JCL TRANSLATOR (JCLTRN) 


The JCL translator is a utility program that runs in user memory {as opposed 
to running in memory that is allocated to the operating system). This pro- 
gram translates expanded JCL statements into an internal binary representa- 
tion for later processing. Input to the translator can be supplied from any of 
the standard 980 input devices (card reader, cassette, magnetic tape, disc 
files, etc.). Output from the translator is stored ona disc file for later sub- 
mission, Since the translator is a utility program, it can be invoked as any 
other user program by using abbreviated JCL form, The saved JCL sequence 
for the translator is stored on the system disc together with several other se- 
quences that are supplied with each DX980 installation. The name assigned 


e 
to the sequence for the translator is JCL. 


8.2.1 STANDARD JCL PROCEDURE 


The following JCL is a standard procedure for invoking the JCL translator 
(JCLTRN). 


+® CREATE JCL ,COMMENT,®CREATE JcL PROCEDURE " 
/REPLACE JCL . CREATE JCL PROCEDURE . 
/EXEC OBJs(1,SYSTEM,/JCLTRN) MEM™(398,7550,1880) PRIYer1. 15)? 


/ _ TIMEsel MEMS=MEM PRTYsePRI 
/ASSIGN 1 SC DEVICEseDSRC FILEssFSRC BUFFERS#1! p SOURCE INPUT 
ASSIGN 2 SC DEVICESsDERR SHAREs sSERR « ERROR MESSAGE 


/ASSIGN 3 SC DEVICESsDOLST FILEssFLST SHAREssSLST AUFFERS#1.S0URCE |.ISTING 
/ASSIGN 4 DISC} DEVICE:sD0BJ FILEs(SYSTEM,SJCBFL»AB)s 


/ FILEssFOBJ REPLACEssRoBJ BUFFERSs2 INDEXEDs 

/ ACCESSSCANY,ANY*ANY/ANY) ACCESS2 8COBJ3 

/ ALLOCATE®#(1,8,96,28) ALLOCATESsLOBJ KEYLENS6 - OBJECT OUT FILE 
7END 


Change 1 8-1 Digital Systems Division 


3° 
ri 934005-9701 


8.2.2 MEMORY PARTITION REQUIREMENTS 
The memory allocation parameters for the JCL translator are: 


MEM=(300, 7550, 650) 


8.2.3 LUN ASSIGNMENTS 
The LUN assignments required by the JCL translator are listed in table 8-1, 


| Table 8-1, JCLTRN Logical Unit Assignments 


Expanded JCL input 


Any sequential access input device 
file 
Normally assigned to DUMMY when 
input is from a Data Terminal; 


otherwise assigned to SYSOUT or 
LP1. 


Error Message 


JCL echo print 


Key indexed file with key length of 
6 characters and a physical record 
length of 96 words. 


Binary Format JCL output 


8.2.4 OPERATION 


Refer to Section II of this manual for a description of the JCL translator, 


8.2.5 ERROR CODES 


Refer to Appendix A of this manual for JCL error codes, 


8.2.6 SAMPLE INPUT 


Refer to Section II and Appendix B of this manual for sample input sequences, 


8.3 MASTER FILE DIRECTORY EDITOR (CATLOG) 


The CATLOG utility allows the operator to list, create, or delete users in 
the Master File Directory of any specified disc volume. 
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8.3.1 STANDARD JCL PROCEDURE 


The following JCL is a standard procedure for the Master File Directory 
Editor, CATLOG: 


.# CREATE CATLOG,COMMENT, "LIST, CREATE,OR DELETE USERS" 

/REPLACE CATLOG « LIST, CREATE, OR DELETE USERS , 

/EXEC OBJ8(1,SYSTEM,CATLOG) MEM=(300,4000,670) PRTY#(1,5)) 

/ PRIV TIMEZ=1 PRTY3#PRI m 

7ASSIGN @ SC ——DEVICEs#DCON SHARE? #SCON . CONTROL 
7ASSIGN 6 SC DEVICEs#DLST FILEs#FLST SHAREt#SLST BUFFERS®1.USER LISTING 
7END 


8.3.2 MEMORY PARTITION REQUIREMENTS 


The job area required to run CATLOG must only be large enough to contain 
the load module since CATLOG requires no work space. Sufficient job area 
is 4000 words; sufficient job extension area is 670 words, 


8.3.3 LUN ASSIGNMENTS 
The logical unit assignments needed for CATLOG are listed in table 8-2, 


Table 8-2. CATLOG Logical Unit Assignments 


LUN Description Comments 


Message Control Any input/output device 


Listing of Users Any printing device 


8.3.4 OPERATION 


The Master File Directory Editor, CATLOG, is a single task program that 
runs under DX980 in the privileged mode. Since it accesses portions of the 
system which are inaccessible to the user, the CATLOG modules must be 
linked with the system external definition file (SYSTEM, DXEXTD). 


The program, CATLOG, should be run from the system console only. It 
first types the message: 


ENTER COMMAND TYPE--LIST, CREATE, DELETE-- 


on the message and control device (LUN 0) which is usually assigned to the 
system console. The operator then responds by entering the first letter of 
any of the three commands (i.e. L, C or D), followed by a carriage return to 
select a list, create, or delete user operation, respectively. CATLOG then 
requests the disc volume identification by printing to LUN 0: 


DISC VOLUME ID = 
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The user responds by entering a number between 1 and 20 followed by a car- 
riage return, This number selects the disc pack contained in the disc drive 
with that number. The default for this input parameter is disc drive 1 and 
can be invoked by entering carriage return without selecting a number. 


Beyond this point, CATLOG's response is dependent on the function (list, 
create, or delete) selected, Table 8-3 summarizes the input/output of 
CATLOG for the three functions, The three functions are described sep- 
arately in the next three paragraphs, 


8.3.4.1 LIST, Ifthe user responds with an L input to select the list users 
function, the utility prints on LUN 6 an alphabetically ordered list of all 
users on the disc volume selected, The utility also prints the date and time 
of request. 


CATLOG provides the following information for each user: 
e User ID - the name of the user associated with the directory, 


e Integrity code - A three-position code that defines allowed operation 
to the user directory for three separate operations. The output 
format is X, X, X, for read, write, delete operations respectively. 
The letter X represents either N, C, or A (NONE, CREAT, ANY, 
the file level integrity codes used as input to the JCL translator/ 
interpreter). Table 8-4 provides an interpretation of the three 
integrity codes as a function of operation at the user level, 


e Current user directory size - the number of tracks currently as- 
signed to the user directory. 


e Maximum user directory size - the maximum number of tracks that 
can be assigned to the user directory. 


In addition to the above tabular data for each user on the disc volume, 
CATLOG prints the following information for the entire disc volume, 


e Number of users 
e Number of tracks available 
e Number of tracks used 
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Table 8-3, 


CONSOLE OUTPUT 


ENTER COMMAND TYPE--LIST, CREATE, DELETE-- 


DISC VOLUME ID = 


USER ID = 


en ee ee a 


INTEGRITY CODE = 


MAXIMUM DIRECTORY SIZE = 


= None 
Creator 
Password 
= Any 


FIN 
C 
P= 
A 


a ne nee 


any disc drive number 1 through 20 


tory (default = 1) 


CATLOG User Interaction 


User Response 


CREATE 


DELETE 


(default = 1) 
eens Maa renee 
A 1 to 6 character alphanumeric 
name of the user ID. (no default) 
4 alphabetic charac- 
ters, separated by 
commas, designate 
the access codes for 
read, write, delete 
and execute acces- 
ses (default = A, A, 
A, A)* 


Number of tracks to 


designate maximum 
size of user direc- 
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Table 8-4, User ID Integrity Codes 


Operation 


Integrity 


Code Write Delete 


N, X, X no X, N, X noone can| X, X, N no one can de- 
one can access] define new files lete or replace files 

the files under| under the user ID under the user ID 

the user ID 


Cc, GC, C Pe ee x, 2G [> 


only the cre- only the creater only the creator can de- 
ator can ac- can define new files | lete or replace files 
cess the files | under the user ID under the user ID 

under the 

user ID 


A, X, X Ky Ay py 

any one can any one can define any one can delete or 
access the new files under the replace files under the 
files under user ID user ID 

the user ID 


[> Creator - that user whose < userid > parameter in the JOB 
command matches the <userid> of the directory. 


8.3.4.2 CREATE, Ifthe user responds with a C input to select the create 
user function, the utility requests the following additional information (in 
addition to the disc volume ID): 


e User ID - A 1 to 6 character alphanumeric name of the user ID to 
be created, followed by a carriage return. 


e Integrity code - A 3-position code that defines allowed operation to 
the user directory for three separate operations, 
The input format is X, X, X for read, write, delete 
operations, respectively, The letter X is N,C, or 
A. See table 8-4 for an interpretation of the three 
integrity codes as a function of operation at the 
user level. The default for this input parameter is 
A, A,A for unlimited user operations, 
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@ Maximum user size - A decimal number that designates the maxi- 
| mum number of tracks to be assigned to the 
user directory. The default is 1 track. 


The program then creates the designated user by entering a user file direc- 
tory (UFD) keyed on the user ID into the master file directory. 


8.3.4.3 DELETE, If the user responds with a D input to select the delete 


continuing. If other jobs are running, an error message is printed to LUN 0 
and the CATLOG job is terminated. If the job does not terminate at this 
point, the utility requests (in addition to the disc volume ID) only the user ID 
to be deleted. The utility then deletes the user file directory (UFD) from the 
master file directory as well as all files created under that user ID. The 
CATLOG delete function should not be used to delete individual files under a 
user, but only to delete an entire user directory, including all files residing 
within that directory. The delete function of CATLOG may be used only when 
no other jobs are in the system. 


8.3.5 ERROR CODES 


Table 8-5 lists the possible error/termination message printed by CATLOG 
to LUN 0, Those that are possible only when a specific function is requested 
are indicated accordingly in the table, 


Table 8-5, CATLOG Error Messages 


Current 
Function 


Meaning 


Message 


NORMAL TERMINATION Process performed cor- 
rectly no errors 

ILLEGAL COMMAND | First character of Com- 
mand input not an L, C, 
or D, 

TOO MANY JOBS IN THE SYSTEM D Delete command-cannot 


be run if there are other 
jobs running under 
DX980, 


ILLEGAL INTEGRITY CODE C Create command-user 
integrity code is not of 
format X, X, X where X 
is A, C, N, 


BAD DATA Numerical input not a 
valid decimal integer. 
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Table 8-5, CATLOG Error Messages (Continued) 


Current 


M ; 
Function ce 


Message 


ILLEGAL DEVICE ID Device ID not in the 
Physical Device Table 
chain, 


DISC OFFLINE Disc is not enabled, 


PREV. DEFINED USER ID Create command-user_ 


ID already defined in 
the Master File Direc- 
tory. 


ILLEGAL USER ID Delete command-user 
ID not found in the 
Master File Directory, 


USER ID MISSING Delete command-user 
directory file control 
block is not in the file, 


8,4 LIST USER FILE DIRECTORY (CATFIL) 


The CATFIL utility lists all files in the User File Directory for a specified 
<userid>. It also tabulates all pertinent information for each file. 


8.4.1 STANDARD JCL PROCEDURE 
The following JCL is a standard procedure for List User File Directory 


CATFIL: 
.* CREATE CATFIL,COMMENT, "LIST FILES UNDER A USER " 
ZREPLACE CATFIL . LIST FILES UNDER A USER . 
ZEXEC OBJ8(L,SYSTEM,CATFIL) MEMS (300,1850,678) PRIYS(1,5)5 
/ PRIV TIMESei PRTYssPRY 
ASSIGN @ SC DEVICEs=DCON SHARES sSCON « CONTROL 
/ASSIGN 6 SC DEVICErsDLST FILEssFLST SHARESSSLST BUFFERSS1.FILE LISTING 
7END 


8.4.2 MEMORY PARTITION REQUIREMENTS 


The job area required to run CATFIL must only be large enough to contain 
the load module since CATFIL requires no work space. Sufficient job area 
is 1850 words; sufficient job extension area is 670 words, 
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8.4.3 LUN ASSIGNMENTS 
The logical unit assignments needed for CATFIL are listed in table 8-6. 


Table 8-6, CATFIL Logical Unit Assignments 


Message and control Any input/output device 


6 Listing of files Any printing device or a file 


8.4.4 OPERATION 


CATFIL is a single task program that runs under DX980 in the privileged 
mode, Since it accesses portions of the system that are user inaccessible, 
it is necessary to link the CATFIL modules with the system external defini- 
tion file (SYSTEM, DXEXTD). 


The program, CATFIL, may be run from the system console or from the 
Batch Processing or Interactive Terminal Subsystems. When run from other 
than the system console the printout of the password for each file is sup- 
pressed, CATFIL types the following request on the message and control 
device (LUN 0): ' 


USERID = 


The user responds with a 1 to 6 character identifier for the <userid> of the 
User File Directory to be listed, The utility then requests the volume num- 
ber (i.e. disc drive number) of the disc containing the User File Directory: 


DISC VOLUME ID = 


The user may respond by entering a specific integer value from 1 to 20 fol- 
lowed by a carriage return, or by invoking the default volume number of 1 
by selecting carriage return only. The utility then prints the date and time 
of request, and an alphabetically ordered list of all files within the selected 
User File Directory on LUN 6, The information provided by CATFIL for 
each file is as follows: 


e File Name - 1 to 6 alphanumeric characters identifying the file. 


e Disc Address - hexadecimal track address of initial track allocated 
to the file. 


e Password - 0 to 4 alphanumeric characters identifying the password 
for the file, If CATFIL has been invoked from other than the sys- 
tem console any passwords for files will be replaced with asterisks. 


i 
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Integrity code - four alphabetic file access codes in the form XxX}, 
Xo X 3 xy where 

X, = read access code 

Xo = write access code 

X3 = delete access code 


X4 = execute access code 


In general X; can be: 


= No one can access the file, 


The creator can access the file, 


UO OS 
i 


= The user having the correct password can access the file, 
A = Anyone can access the file, 


Current File Size = Number of tracks currently allocated to the file, 
If the file is completely full, this current file size exceeds the maxi- 
mum file size by 1 track for linked sequential and key indexed files 
only. 


Maximum File Size - Maximum number of tracks that may be allo- 
cated to the file. One additional track may be allocated to a file at 
the time the file becomes full, 


File Type - Indicates the type of file from the three supported types; 
linked sequential, relative record, and key indexed, 


Logical Record/Key Length - Number of characters in the fixed 
length logical record for relative record files, Number of charac- 
ters in the key for key indexed files. 


Physical Record Length - Number of words in the physical record 
for any type file. This establishes the length of the system acces- 
sible buffers used for input/output to the file, 


In addition to this tabular data for each file within the User File Directory, 
CATFIL prints the following information for the specified User ID: 


8.4.5 


The number of files 


The number of tracks allocated 


ERROR CODES 


The possible error/termination messages printed by CATFIL to LUN 0 are 
listed in table 8-7, 
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Table 8-7. CATFIL Termination Messages 


NORMAL TERMINATION Process executed correctly 


INVALID DEVICE ID Device ID is not in the Physical Device 
Table List 


n TNDTTIT fram the CONSO!I TioiTTaavr TN fa 
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greater than 6 characters OR first charac- 
ter is not a letter 


DISC OFF LINE 


BAD NUM Input from the console - not a valid deci- 


mal integer 


UNDEFINED USER ID User ID not found in the Master File Direc- 


tory 


8.5 DX980 OVERLAY LINK EDITOR (DXOLE) 


The DX980 Overlay Link Editor (DXOLE) must be used to format input object 
records into a load module for execution under DX980, Three program 
structures are allowed: 


1, A memory resident program with no overlays 
2. An overlay structure defined at link edit time (preplanned overlay) 


3. Anoverlay structure that is dynamic and can change during execu- 
tion (unplanned overlay). 


DXOLE functions in three different modes to allow maximum flexibility to 
the user. These modes are: 


@ Compact Mode - The Compact mode combines object modules to 
create new object modules. All references for defined symbols be- 
tween the object modules are resolved, All references to entry 
points not found in the object modules are left unresolved, The ob- 
ject module produced is relinkable. The new object module defines 
all the entry points defined in the linked modules as entry points 
and contains references to the unresolved entry points, 


e Normal Mode - The Normal mode combines one or more object 
modules to create a load module for execution, This mode is the 
default mode for the link editor, The load module created may or 
may not contain an overlay structure, depending upon parameters 
supplied by the user. The Normal mode can produce an External 
Definition File, This file contains the symbol names and addresses 
of the entry points defined in the root segment of the created load 
module, 
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@ Subsystem Mode - The Subsystem mode combines one or more ob- 
ject modules to create a load module containing a subsystem for 
execution, This load module may contain a preplanned overlay, but 
cannot contain an unplanned overlay. Subsystems execute as abso- 
lute programs. Therefore, they can address into the root segment 
of the operating system. In the Subsystem mode an External Defini- 
tion File produced during a previous Normal mode link of the oper- 
ating system resolves external references, 


8.5.1 STANDARD JCL PROCEDURE 
The following JCL listing is a standard procedure for DXOLE: 


7REPLACE DXOLE « LINK EDITOR 4 ; 

7EXEC OBJs(1,SYSTEM,OXOLE) MEM®(300.12000,2000) PRTY#(1,15)3 

/ TIMEs=1 MEMS@MEM PRIYS=PRI TIMESSTIM re : 
/ASSIGN 1 DUMMY DEVICEssD0B1 FILEs#FOB1 BUFFERS=2 » ALT 1 OBJECT IN 
/ASSIGN 2 DUMMY DEVICE?s00B2 FILEs#FOB2 BUFFERS=2 > ALT 2 OBJECT IN 
/ASSIGN 5 DISCL DEVICErsDIN FILEse#FIN BUFFERS#! > PRIMARY INPUT/CON 
/ASSIGN 6 SC DEVICEs®DLST | . > LOADMAP LIST/ERR 
“ASSIGN 7 DUMMY DEVICEss008J FILEssFOBJ BUFFERS#! . COMPACT OBS OUT 
/ASSIGN 8 DISC1 DEVICEss0L™ FILEssFLM REPLACEs®RLMs 

/ BUFFERS#i RELREC ACCESSa(ANY,CREAT.CREATSANY)) 

/ ACCESS#@CLM ALLOCATE®(1,0,3261) ALLOCATE! s1.LM3 


/ LRECL 864 * LOAD MOD OUTPUT 
/ASSIGN 9 DISCL FILE®(SYSTEM/USRFTN) DEVICE: *DLIB3 

/ FILE:sPLIB BUFFERS#2 yi 
/ASSIGN 18 DISC1 FILEs(TEMP.SCRL) NEW BUFFERSs1 LINKSFQ) ~~ a 
/ — ACCESS8(ANY,ANY,ANYANY) ALLOCATES (10,308,256230) , LINKSEQ SCRATCH. 
/ASSIGN 11 DISC1 FILE#(SYSTEN,DXEXTD) FILESeFEXT BUFFERS#1 . SYS EXT DEFS OPT 
/ASSIGN $3 DISC1 FILES(TEMP.SCRR) NEW BUFFERS#1 RELRECS 


LIBRARY FILE 


/ ACCESS# (ANY, ANY,sANYSANY) ALLOCATE#(10,300,128,18)), Bat: — 
vis LRECL#s190 - RELREC SCRATCH 
/ 


8.5.2 MEMORY PARTITION REQUIREMENTS 


DXOLE memory requirements. for linking an average program are defined 
with the following expression: 


MEM=(300, 12000, 2000) 
DXOLE is an overlay program with variable memory requirements, 


DXOLE requires 7950 words of program space plus a 2000 word Job Exten- 

sion Area (<jearea>). A variable amount of table space is required depend- 

ing upon the number of references, definitions, overlays, and identifications 
in the input object decks. The memory requirements do not depend upon the 
size of the load module being produced, The following guidelines aid in de- 

termining the size of the variable tables: 


® 17 words per overlay to be generated 
e 12 words per DEF 


e 12 words for the first REF and 3 words for each subsequent REF 
to a label | 
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e 9 words per common definition 
® 3 words per common reference 
e 13 words per object module 


e 5 words per OBJNAM parameter (unplanned overlays) 


e 3 words per Library LUN specified 


Table 8-8 provides a summary of the LUN assignment requirements for 
DXOLE as a function of mode, As can be seen in the table, not all assign- 
ments are required for each mode, In addition to these standard LUN's any 
other LUN's can be assigned to DXOLE and accessed by means of Include, 
Search, and Library commands, 


8.5.4 OPERATION 


DXOLE allows two different overlay structures, preplanned and unplanned, 
Each structure has advantages and the user should decide which, if any, 
overlay technique to use. The control cards describe the program structure 
to DXOLE., 


8.5.4.1 PREPLANNED OVERLAYS, A program that is link edited in the 
Normal mode or Subsystem mode with the overlay (OVLY) option is called a 
preplanned overlay, The programmer describes the overlay structures for 
the program with the Root and Segment control cards, During execution of a 
preplanned overlay structure, a Runtime Overlay Manager (OLM$#$) loads 
all overlays into memory. The link editor includes the overlay manager as 
part of the root segment, The Runtime Overlay Manager determines the re- 
lationships between overlay segments and the load addresses of the overlays 
by inspecting overlay transfer vectors built by the link editor, These run- 
time vectors, called the Overlay Segment Vector (OSV$#$) and Overlay 
Transfer Vector (OTV$#$), are also included in the root segment of the load 
module produced. 


The link editor uses the call- by-name technique for loading overlays ina 
preplanned overlay structure, The user program references the name of 
the definition resolved in the next level of the overlay, The overlay manager 
then loads the overlay and transfers control to the desired entry point, The 
overlay is only loaded when necessary, Following calls to the same overlay 
will not reload the overlay unless it has been replaced in memory by another 
overlay at the same overlay level, The overlay manager uses the S and X 
registers and does not preserve their values, The calling program must 
save these registers if the contents should not be destroyed, On the pre- 
planned overlay load map all forward references in the overlay are identified 
by the message '**OTV**"', The address associated with the reference on 


a a a a et 
8-13 Digital Systems Division - 


T asueyy 


vI-8 


NOTES: 


Table 8-8, 


Description 


Primary input 


Diagnostics and Memory Maps 


Object Module Output 


Load Module Output File 


Subroutine Library File 


Intermediate Scratch File 


External Definition Input File 


External Definition Output File 


Intermediate Scratch File 


Alternate Input 


Alternate Library File 


DXOLE Logical Unit Assignment 


Mode aay 
| Normal | | Subsystem | 


Comments 


Sequential input device/file with 80 
character record length, Input control 
commands and object modules may be 
intermixed, 


Sequential output device/file with 80 
character record length. 


Sequential output device/file with 80 
character record length. 


Relative record file with 64 character 
record length, 


Dummy or key indexed file with 80 
character record length and 8 character 
key length. This file should be built 
using the Library Builder (LIBBLD) 
utility. 


Rewindable device or linked sequential 
file with 80 character record length. 


Linked sequential file with 8 character 
record length. This file contains the 
external definition table for the cur- 
rently running versions of the operating 
system produced under the Normal 
mode during a previous link edit of the 
operating system, 


Linked sequential file with 8 character 
record length. 


Relative record file with pe: character 
record length, 


Accessed with Include control command 


Accessed with Library control command 
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1 The External Definition Output File is not required for any mode, but is optional for the Normal mode, It is assigned 
only when an external definition table is to be produced. 


2 Optional alternate LUN. 
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the load map points to a table entry that the Overlay Manager will use to load 
the overlay. External references in the overlays are resolved in the follow- 
ing manner, . 


1) A reference to a label defined in the same overlay is resolved as the 
address of the label, 


2) <A reference to a label defined in a lower level overlay which is in 
the path of this overlay is resolved as the address of the label, 


3) A reference to a label which is defined in the next overlay level is 
resolved as an address in the Overlay Transfer Vector, At runtime 
the entries in the Overlay Transfer Vector are managed by the 
Overlay Manager, When an overlay is currently in memory, the 
Overlay Transfer Vector causes control to pass directly to the over- 
lay. When an overlay is not in memory, the Overlay Transfer Vec- 
tor causes control to transfer to the Overlay Manager to load the 
overlay and then transfer control to the overlay. Forward data ref- 
erences may not be used, 


4) No forward references can be made to definitions more than one 
overlay level away. Any such reference is marked as undefined 
("'**U N- DEF *'' on the load map) and is assigned the absolute value 
FEFFEF 16° 


8.5.4.2 UNPLANNED OVERLAYS, An unplanned overlay is a program that 
is link edited in the Normal mode with the No Overlay (NOVLY) option and that 
defines overlays with Object control cards, The programmer describes the 
overlay structure with the Root and Object control cards, The overlay is 
called an unplanned overlay since the location of the overlay in memory is 

not specified when the link edit is performed, During execution the overlay 

is loaded using the load and relocate SVC, DXOLE does not include a Run- 
time Overlay Manager as part of the load module. The second parameter of 
the Object control card defines a name, This name can be an external ref- 
erence in the root or any overlay, and is resolved as the overlay number, 

The link editor does not resolve any other references between overlays, The 
order for resolving external references is: 


1) <A reference to a label defined in the same overlay is resolved as 
the address of the label, 


2) A reference in an overlay to a label defined in the root is resolved 
as the address of the label, 


A reference having the same name as the second parameter of the 
Object control card is resolved as the overlay number, These items 
are identified on the load map by the message, **MIP**, 
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4) No references can be made to definitions in any overlay. Any such 
reference is unresolved and is flagged as ''**UN-DEF**'' on the load 
map. Hexadecimal FFFF is assigned as the value of the unresolved 
reference, 


8.5.4.3 CONTROL CARDS. Figure 8-1 illustrates the format of the three 
DXOLE control cards (Type I, Type Il and Type III). Control cards must 
have a blank in column one, a card name starting in column two and one or 
more blanks preceding the first argument. Commas separate each argument. 
The argument list cannot contain imbedded blanks. Arguments may be speci- 
fied up to and including column 72. Comments can be placed on the control 
cards following the first blank after the last argument specified. These con- 
trol cards relate three kinds of information to the link editor: 


e The mode of the link edit to produce either a relinkable object mod- 
ule or a load module, 


e The relationship between the memory image phases in the load mod- 
ule, 


e The input LUNs for the object modules to be included with each 
Type II control card, 


Table 8-9 indicates the Type II and Type III cards that are valid for each 
Type I control card and its options, Figure 8-2 shows a sample control deck 
and a block diagram of the associated program. 


TYPEI: 
PAGE (D 
a) COMPACT E zo | 
NEXTD @| [| NOVLY @ PAGE 
Ce | ie pe = , MAXSEG= 
me ene ES Svas | : Pere acay gl 2] | "2 9] [Face 
NOVLY_@® a és PAGE @_ 
c) SUBSYSTEM [Rovey |] smaxewr-n, 2] [. MAXSEG=n, 9| Ee ree 
TYPE I:; 
OBJECT IDTNAM, OBJNAM [, HEXCON] 
ROOT IDTNAM 
SEGMENT LEVEL 
TYPE Ill: 
SEARCH 1,2(Keyl, Key2,..., Key) 3 
INCLUDE 1,2(Keyl,Key2,...,Key_),3 
LIBRARY 20,21,22 


@® Default option 
@ Default = 44 
@ Default = 22 


Figure 8-1, Control Card Formats 
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Table 8-9. DXOLE Control Card Sequence and Options 


Valid Type II Cards Valid Type Ill Cards 


Type I 
Control Card 


Root Segment | Search Include 


Compact 


Normal 
No Overlay 


Normal 
With Overlay 


Subsystem 
No Overlay 


Subsystem 
With Overlay 


Note: 


1. Required card 


Library 


10L6 -S00EF6 
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WT 5! OBJECT DECK 
IGLSDE 16(S0) 

LIBRARY 17, 

1 SEGMENT 1 

1 INCLUDE 16(S1) 

I 


; 1700 1x 
Dries LEVEL 1 ae A 
, SEARCH 18(KEY1) 
SEGMENT 3 
3 


70 
LIBRARY 2 


Eee ( 4 7(s$ 
16 ss,s 1 

SEGM ‘st 7S$9) 
1 ae 


1706 
SEGMENT 2 
INCLUDE 18(S7) 
EGMENT 
INCLUDE 16(S8) 
SEGMENT 3 
INCLUDE 2, (@acosine) 
SEARC 
SEGMENT 3 

00 


MIP 7 MIP 10 
rae | | ta | a each vee ae 


1706 
/* 


MIP 9 


(4)130110 


Figure 8-2, Overlay Structure and Control Deck 


Type I Control Cards. A TypeI control card is optional. If present it must 
be the first control card, The Compact card directs DXOLE to link object 
decks together to create new relinkable object decks. The only valid param- 
eter for this mode is to specify the load map use page ejects or double spac- 
ing (PAGE and NOPAGE, respectively). This Normal control card directs 
DXOLE to create a load module for execution. If no Type I card is specified, 
the Normal mode is the default Type I control card. Four optional parame- 
ters may be specified on this card. The NEXTD/EXTD parameter specifies 
production (EXTD) or no production (NEXTD) of an External Definition File. 
The External Definition File is a sequential file that contains the names and 
addresses of all the definition statements in the root segment of the object 
to be linked. This file then links subsystems to the operating system root 
segment. The NOVLY/OVLY parameter specifies production (OVLY) or no 
production (NOVLY) of a preplanned overlay structure. If this parameter is 
not present no overlay will be produced, The MAXENT and MAXSEG param- 
eters specify the maximum numbers of forward references in the overlay 
structure and the maximum number of overlays, respectively. The Subsys- 
tem control card also directs DXOLE to create a load module for execution. 
The arguments valid for Subsystem cards have the same meaning as for the 
Normal card. The Normal and the Subsystem modes handle the External 
Definition File differently. The Subsystem mode automatically references 
the EXTD and creates definition entries for all the names in the EXTD. This 
allows privileged programs to use subroutines that are part of the root of 
the operating system. 
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Type II Control Cards, A Type II control card is required unless the pro- 
gram to be linked is a nonoverlaid and nonprivileged program, For this ex- 
ception, DXOLE will take the program entry point from the first object deck 
in the root segment. This default condition allows the control input of 
DXOLE (LUN 5) to be assigned directly to a linked sequential file output from 
the 986 Assembier or FORTRAN compiler. For ali other DKOLE modes at 
least one control card is required, In the Compact mode an Object card is 
required, In the Normal and Subsystem modes a Root card is required. 
Segment cards can also be specified for the OVLY option and Object cards 
for the NOVLY option, 

A special comment is necessary to explain the specification of a FORTRAN 
main program as the entry point in the DXOLE output. DXOLE uses blanks 
as delimiters between the control card type (i.e., Normal, Root, Include) 
and the arguments. This convention makes the specification of ‘bMAIN}' 
(The FORTRAN main program IDT) impossible. Therefore, DXOLE handles 
the name 'MAIN' as a reserved word. The IDT specification of 'MAIN' on 
either the Root card or the Object card as the object deck with the entry point 
is interpreted by DXOLE to be any one of the following names: 


1 bMAINB - The FORTRAN main program name, 


2. *wkEKEK . The default IDT name assigned to assembler output 
decks 
3. MAIN. - The default IDT name assigned to an object deck by the 


PL/EXUS compiler. 


In the Compact mode the Object card has two arguments. The first argu- 
ment is IDTNAM, This argument is the name of the object deck which has 
-an end vector to be used to define the control entry point of the linked object 
deck, The second parameter is OBJNAM. This argument is the name to 
assign to the new linked object deck, No other arguments are valid. 

Multiple compact mode object decks can be output by entering multiple object 
control cards. The object decks are output to LUN 7 and terminated with a 
single end of file. 


In the Normal and Subsystem modes the Root card defines the memory resi- 
dent code, Segment and Object cards define preplanned and unplanned over- 
lays, respectively. The Root card has one argument, IDTNAM. This argu- 
ment specifies the name of the object deck which has an end vector to be used 
to define the control entry point in the root segment of the load module, The 
Segment card has l argument, the level number, This argument defines the 
overlay's relationship to the other overlays and the root, The root is at 
level 0 of the overlay, The first level below the root is level 1, the next 
logical level is level 2 and so forth, Level numbers must be sequential, An 
Object card also defines an overlay. However, all Object overlays are at 
level 1, The Object card is valid only for the unplanned overlays (NOVLY 
option). The first parameter of the card, IDTNAM, identifies the object 
deck which has an end vector to be used to define the control entry point for 


Change 1 8-19 Digital Systems Division 


(o} 
WO 943005-9701 


this overlay. The second required parameter, OBJNAM, associates a 

name with the overlay being created, This parameter is entered in the 
symbol table of DXOLE with a value equal to the overlay number (i.e. 1 for 
the first, 2 for second, etc.). This entry name may be referenced from any 
other segment and is resolved by DXOLE as the overlay number. The third 
parameter, HEXCON, is optional. If specified, this parameter indicates the 
load address of the newly created overlay. 


Type UI Control Cards. Type Ill control cards specify input LUNs. The 
link editor uses the LUNs to obtain the object programs to be included. Type 
III cards follow the Type Il card defining the beginning of a root or overlay, 
and precede the Type II card that defines the beginning of the next overlay. 


The Search and Include cards have identical formats, Both have one or more 
parameters, Each parameter is either a LUN or a LUN followed by one or 
more indexed record keys grouped inside parentheses, Specified keys are 
evaluated as an USASCII string. Keys are limited to a maximum of 8 char- 
acters, Keys of less than 8 characters are extended on the right with blank 
characters, LUNs accessed with keys must be assigned to an indexed file, 
The Include card identifies particular object modules which DXOLE includes 
in the output phase being created, Search cards identify object modules to 

be searched for a definition that resolves an undefined reference in the same 
phase, Only those modules that resolve external references are included, 
Search and Include cards are processed when encountered in the input stream 
and are scanned from left to right, If the LUNs do not have keys, the link 
editor processes object modules until it finds an end of file. Ifa key is speci- 
fied, the link editor processes all object modules until it finds an end of file 
or another keyed record. DXOLE processes object modules in the input 
stream as if they were specified by an Include statement, The object module 
is included in the output phase regardless of whether it resolves external ref- 
erences, A keyname of 'S6MAINS' cannot be specified because DXOLE does 
not allow imbedded blanks within the list of keys. To include a FORTRAN 
main program, specify a keyname of 'MAIN'. 'MAIN' will be interpreted as 
'SZMAIN$! for this program. 


The Library card can only specify LUNs. Each LUN must have been as- 
signed to an indexed file which has been formatted like the system library. 
The link editor does not search libraries until it processes all other Type 
III control cards. DXOLE then searches the indexed file(s) in the order 
specified by the Library card before searching the system library file. The 
system library, LUNY, is not accessed in the Compact mode unless explit- 
icly specified on a Library control card, 


8.5.4.4. USING DXOLE WITH BATCH INPUT READER, Executing DXOLE 
under Batch Input Reader (BIR) requires careful preparation of the input 
stream if LUNs other than LUN 5 are assigned to the card reader. When 
DXOLE processes an Include or Search card, the referenced LUN is opened 
and read until an end of file is found, The input stream for DXOLE must be 
structured as shown on the following page. 
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ROOT IDT1 

1700 IDT1 

1706 

INCLUDE 17 

1700 IDT2 

1706 

1700 IDT3 
1706 

/* End of file for LUN 17 
SEARCH 18 

*k End of file for input stream LUN 5 


The included file is physically defined inside the data for LUN 5. When 
DXOLE encounters the Include for LUN 17, it opens and reads the file, 
When the end of file is found, LUN 17 is closed and the next control card is 
read from LUN 5, This structure also works for the Batch Input Spooler 
(BIS), However, a more conventional input stream for BIS is as follows: 


//DATA 5 
ROOT IDT1 
1700 IDT1 
1706 


INCLUDE 17 
SEARCH 18 


/* End of file for LUN 5 
//DATA 17 

1700 IDT2 

1706 

1700 

1706 End of file for LUN 17 
[3 
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8.5.5 ERROR CODES 


Table 8-10 lists the error codes and their corresponding meanings for the 
DXOLE utility. 


Table 8-10. DXOLE Error Messages 


Missing Type 1 Control Card 

Improper Control Card Format 
Unidentifiable Control Card 

Maximum Number of Entries Exceeded 
Invalid Control Card Argument 

Unexpected End Of File On LUN 

Missing Type 2 Control Card 

Invalid Control Card For DXOLE Mode 
Multiply Defined Root Segment 

Missing Argument Following Delimeter 

Too Many Arguments 

Undefined Program Name 

Invalid Delimiter 

Invalid LUN 

Invalid Key 

Missing 1700 Object Record 

Level Number Not Sequential In Overlay 
Maximum Number Of Segments Exceeded 
Maximum Number Of Entries Too Large 
Invalid Number Specified 

Numeric Overflow >16 Bit Signed Number 
Missing Root Segment 

Multiply Defined Name 

Invalid Level Number 

Table Requirements Exceeded Available Memory 
Object Decks Must Be Relocatable 
Unidentifiable Object Record 

Checksum Error 

Missing 1706 Object Record 

Common or External Reference Not Defined 
Before Referenced 

File Organization Does Not Allow Keyed Access 
Library File Not Properly Structured 

Block Data STMTS Must Be In MIP Defining the 
Common 


1 
2 
2 
4 
5 
6 
7 
8 
9 


a 
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8.5.6 INPUT FORMAT 


The following paragraphs describe the structure and format for input ac- 
cessed by DXOLE, Refer to the description of the JCL translator in this 
section of the manual for the structures of: 


& Library files 
e Data sets 


8.5.6.1 DATA SET STRUCTURE FOR SEARCH AND INCLUDE, LUNs 
referenced by Search and Include commands can be accessed either sequen- 
tially or randomly. The user specifies the access method by supplying either 
a LUN only, or a LUNanda key. When supplied with a LUN only, DXOLE 
processes the LUN sequentially until it finds an end of file, Data sets or de- 
vices assigned to these LUN's must allow sequential access of data, All 
records read from that LUN must be in DXOLE input object format. By 
specifying a LUN number and the value of a key, the user can specify pro- 
cessing of any part of a key indexed file. (The LPFBLD utility can be used 
to build a key indexed file with keynames equal to the object deck IDTNAM,) 
The key is an index for positioning to the first record to be read. Process- 
ing is complete when DXOLE encounters either an end of file or another rec- 
ord with a key. The key lengths are restricted to eight characters, Ifless 
than eight characters are specified, the editor adds USASCII blanks on the 
right of the key to make eight characters, The physical structure of the data 
set is as follows: 


Keys Data Associated with Key (Object Record) 
PGM0O 1b 1700 PGMO1 
1702 


1706 
TABLES 1700 TABLE 


1706 


To include object modules from this data set, the programmer specifies the 
name of the program(s) to be accessed, For example: 


INCLUDE 1(TABLE, PGMO0O1) 


A key indexed file with this structure can also be accessed without specifying 
a key since DX980 file management allows sequential access of records for 
key indexed files, 
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8.5.6.2 LIBRARY AND SYSTEM LIBRARY STRUCTURE, DXOLE assumes 
that LUN 9 has been assigned to either a dummy file or a key indexed file that 
was created with the DX980 library builder (LIBBLD) utility program. If as- 
signed to DUMMY, no processing other than syntax checking occurs, Ifas- 
signed to a library file, that file has the characteristics described in the fol- 
lowing paragraphs. 


Library files must reside on disc and must be in the following format: 


Record Key Data Associated with Key 

QQSINE 1700 SINE 
1702 SIND Records defining 
1702 SINE entry points, 


1702 ARCSIN 


1706 
SIND QQSINE 
SINE QQSINE 
ARCSIN QQSINE 
QQCOSINE 1700 COSINE 
1702 DCOS 


1702 COSINE 
1702 ARCCOS 


1706 
DCOS QQCOSINE 
COSINE QQCOSINE 
ARCCOS QQCOSINE 


The 1700 object record of all programs in the library have a key equal to the 
characters 'QQ' concatenated with the identification name of the program. 
All other object records for this object deck are sequentially linked to the 
keyed 1700 record, The utility program that creates the library also makes 
a key equal to each entry point in the object module (i.e., SINE, SIND, 
ARCSIN for object deck SINE). The data associated with each key is another 
key that positions the file at the 1700 object record of the program defining 
the entry point. DXOLE accesses all library files in the following manner 
for each unresolved external reference: 


(1) The name of the symbol referenced is used as a key to read the 
library. 


(2) If the key does not exist, the symbol is not defined by any object 
module in the library. 


a 
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(3) If the key exists, the first 8 characters of the record returned are 
used as the key of a second read operation, 


(4) The data returned with the second read must be the 1700 object rec- 
ord of the module defining the external reference, Also, the second 
key must exist or the library is improperly structured, 


(5) Processing of the object module terminates with the 1706 record, 


Library files may also be referenced with Search and Include control cards 
by specifying the key that positions the file at the 1700 record, That is, the 
letters 'QQ' followed by the identification name of the program to be ac- 
cessed: 


INCLUDE 9(QQSINE, QQCOSINE) 


A library file must have a key specified if accessed with an Include or Search 
card since some of the records contain keys rather than object records, 
Using an Include ona library might be necessary if the order of the object 
modules in the load module is important, Otherwise, normal library pro- 
cessing at the end of a program segment will include those program neces- 
sary to define external references, 


8.5.6.3 OBJECT RECORD FORMAT, DXOLE accepts object from linked 
sequential files, key indexed files, and devices, Several different data set 
organizations are allowed, The DXOLE control cards describe the organiza- 
tion of the data set and therefore the processing method used. All input data 
sets must define at least one object module, Seven standard object records 
are used by all object modules, These object records are illustrated in fig- 
ure 8-3, Note that each record contains 32 words. All numbers are hexa- 
decimal, and the object records are independent of the object media, The 
first word of each record specifies the record type (0-6), The last word in 
each record is a checksum, which is the two's complement of the sum of the 
first 31 words, 


Identification Record, The identification record contains the program name 
which may be specified, for example, inanIDT assembler directive, If the 
program name is greater than six characters, it is truncated; if it is less 
than six characters, trailing blanks are inserted. Leading zeros are in- 
serted in the format code, 


Common Symbols, Each record of common symbols contains a maximum of 
seven symbols, Each symbol contains six characters, and trailing blanks 
are inserted as required. A stop code is required following the last symbol 
in each record, 


Entry Points, Each record of entry points contains a maximum of seven 
entries as indicated, for example, by a DEF assembler directive, 
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IDENTIFICATION 


FORMAT CODE 


FORMAT CODES 


5=RELOCATABLE OBJECT 


PRNAME IS THE 
PROGRAM NAME 
IN ASCIT CHARACTERS 


CHARACTERS 60 AND 61 
ARE RESERVED. 


0) 17 
2 3 
aan oe 
62 5 

CHECKSUM 


ENTRY POINTS 


UP TO SEVEN ENTRY POINT 
SYMBOLS ARE CONTAINED 
WITHIN A RECORD. 


A STOP CODE 003016 !S 
INSERTED FOLLOWING 
THE LAST ENTRY POINT 
ADDRESS TO INDICATE 
THE END OF DATA WITHIN 
A RECORD. 


CHARACTERS 60 AND 61 #8 
ARE RESERVED. 


(A)130394 (1/2) 


Figure 8-3, 


ENTRY POINT 
SYMBOL NO. 1 


ENTRY POINT 
SYMBOL NO. 2 


A STOP CODE 003046 |S 
INSERTED FOLLOWING 
THE LAST SYMBOL LENGTH 
TO INDICATE THE LAST 
COMMON SYMBOL ENTRY 
WITHIN A RECORD. 


CHARACTERS 6061 
ARE RESERVED 


COMMON SYMBOLS 


COMMON 
NO.1 
8 9 
LENGTH 
a a 
7) - COMMON 
16 7 


LENGTH 


COMMON 
SYMBOL 
NO.3 


Nn 
Ww 


Nn) 
o 
i 


25 
LENGTH 
27 


COMMON 
SYMBOL 
NO.4 


NO.5 


| ii 


1 
LENGTH 


COMMON 
SYMBOL 
NO.6 


LENGTH 


COMMON 
SYMBOL 
NO.7 


| SYMBOL 


7 
LENGTH 


i 


Object Records (Sheet 1 of 2) 
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EXTERNAL REFERENCES 


EXTERNAL 
REFERENCE 
~NO.1 
VARIABLE 
LENGTH DATA 
; (ITEMS CAN BE 
EXTERNAL 1 TO 3 WORDS). 
REFERNANCE 
NO.2 


ASTOP CODE 003016 !S 
INSERTED FOLLOWING 
THE LAST EXTERNAL 
REFERENCE TO INDICATE 
THE ENO OF DATA 
WITHIN A RECORD. 


UP TO SEVEN EXTERNAL 
REFERENCES CAN BE 
CONTAINED WITHIN A 
RECORD. 


CHARACTERS 60 AND 6&1 
ARE RESERVED. 


BLOCK DATA 


BLOCK DATA RECORDS 
2 3 ARE OUTPUT BY THE 
‘ COMMON NO. FORTRAN COMPILER. 
4 5 
RELATIVE LOCATION 
6 


VARIABLE LENGTH, <4 
DATA WORDS (MAY NOT | 
EXTEND BEYOND THE END 
OF THE RECORD) 


A MINUS ONE IS INSERTED 
TO INDICATE THE END OF 
DATA WITHIN A RECORD. 


(A)130394 (2/2) 


TEXT 


?remdunr 
4 5 

RELOCATION MAP 
6 ? 

LOAD ADDRESS 
ae ee 
H | | | item | vem | item | trem | 

1 2 3 4 
ITEM 4 
RELOCATION MAP 


a 
a 


\ ADDRESS OF FIRST ITEM AFTER THIS WORD. 


RELOCATION MAP 


RELOCATION MAP 


ITEM 21 
; 6 6 0 WORD, ABSOLUTE 
0 1.0 WORD, RELOCATABLE 
CHECK SUM 0 1 1 WORD, EXT. REFERENCE 
100 BYTE, ABSOLUTE 
10 1 BYTE, COMMON 
110 BYTE, RELOCATABLE 
114 BYTE, EXT. REFERENCE 


| 
| 
be 


1= LOAD ADDRESS INCLUDED 


LOAD AODRESS 
a 


O= NO LOAD ADDRESS 


ITEM n 


END 
2 3 


ENTRY ADDRESS 


6 ? 
PROGRAM LENGTH 


gos 
S| 


X=0 FOR NO VECTOR 
X=1 USE ENTRY ADDRESS 
AS END VECTOR. 


ee 
ce 
cece 


Figure 8-3, Object Records (Sheet 2 of 2) 
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External Reference Points, Each record of external reference points con- 
tains a maximum of seven references as specified, for example, by a REF 
assembler directive, 


Text Records, All text records include an item count between 1 and 22 for 
the current record, Each item is between one and three words long, and all 
words in an item are contained within one text record, The number of object 
record words per item in memory, and the relocation character printed in 
the first column of an assembly listing appear in table 8-11, The final relo- 
cation map in each record applies only to items within the current record, 
not to any items in the next record, 


Table 8-1l1l. Text Record Parameters 


Assembly Words per Words per 
Item Type in Relocation Map Listing Item in Item in 
Character Memory Text Record 


Absolute word 

Common word 
Relocatable word 
External reference word 
Absolute byte 

Common byte 
Relocatable byte 
External reference byte 


NM NH DY DN BR Re es 
WN WN DNDN Be WN 


Block Data, The block data records contain common numbers which are 
used to order the symbols in the common symbols records for easy refer- 
ence, For example, common number one refers to the common names in 
the first entry of the first common symbols record. Relative location refers 
to the start of the appropriate common, and data count is the number of 
words, not items, in the specified common, 


End Record, The end record indicates the end of the object program, and 
contains the program length in words, 


Syo.¢ DROLE OUTPUL FORMATS 


DXOLE has two output formats: object modules and load modules, Object 
modules, output by the Compact mode, have the same record formats as 
previously described for object records, The format of a load module is 
shown in figure 8-4, Table 8-12 describes the fields of the load module, All 
programs submitted for execution under DX980 must be in load module for- 
mat; object modules cannot be executed directly. 
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ee SSDS SS LD 


ROOT PHASE (MEMORY IMAGE PHASE 0) 


3N WORDS 


RELATIVE 
RECORD NO. 


fo) 


CODE FOR ROOT 


K -1 E EPA 
fr) tol o 
K BA 
0 0 | 
R BTA |BTA |BTA BTA 
Lo oil oo 0 0B 
O 
MEMORY IMAGE PHASE 1 (1ST OVERLAY) 
RR 
® 
@ 
e 
RR +K 
1 
MEMORY IMAGE PHASE N (LAST OVERLAY) 
RR 
N 
Cc) 
@ 
co) 
RR +K 
N oN 
(A)1 30395 


Figure 8-4, DX980 Load Module Records 
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Es 


Table 8-12. Load Module Field Definitions 


N Number of overlays. 


RR; Relative record number of the first word of overlay. The rela- 
tive record number of the root phase (RRo) is always 0. 


Ll, Number of words in the code portion of the overlay including 
the entry point word, The length of the root phase (Ll q) is in 
the File Control Block (FCB) of the load module file and is not 
part of the load module proper. L1g includes the length of the 
overhead words for the root segment (3n +3 words long). 


L2,; Length of the relocation map in words, L2g is in the FCB of 
the load module and is not part of the load module proper. 


LP The address of the first word beyond the longest overlay path. 
On the memory image phase file, this word is numerically equal 
to the number of words used by the longest overlay path. The 
word is marked for relocation in the relocate flag table, If the 
load module is executed in the unprivileged mode, no relocation 
will be performed. If the load module is executed in the privi- 
leged mode, a relocation constant equal to the absolute address 
of Wo0 will be added, In either case the value in memory is 
the address of the first word beyond the longest overlay path in 
the address space of the executing Job. 


ERC In the memory image phase file this word is numerically equal 
to 3*N+3 and is marked for no relocation in the relocate flag 
table, The correct value is error checked on the load of the 
root phase. After the root phase has been loaded the cell in 
memory is changed to have the absolute address of N. 


Woi Word 0 of the code for overlay i. 

Es Last word of code for overlay i. 

EPA: Entry point address for overlay i. 

Kj Number of sectors required to hold the code portion of overlay 


i. Ky; may be calculated from Ll; or, 
K, = ((L1j+31) /32)*32, | 


using integer arithmetic, 


i a SS SS SSS 
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Table 8-12. Load Module Field Definitions (Continued) 


BA is a value set by DXOLE to calculate the relocation bias to 
be applied to all relocatable words in the code area from the 
formula, 


BIAS = FWLA-BA, 


(ADDR(N) if i = 0 or ADDR(Wo;) if i # 0). 


For the root segment BAg is set to -(3*N+3) so the bias will 
evaluate to the address of W099 when loading a privileged 
program. For preplanned overlays, BA is set to the pre- 
planned address relative to Wo0-. For unplanned overlays, 
BA is set to 0. 


Number of byte relocatable items in the code portion of the 
overlay. 


First word of the relocation bits. There is 1 bit for each 
word in the overlay. Inthe root, the first relocation bit cor- 
responds to the N, the number of secondary overlays, A 1 in- 
dicates a relocatable item. 


where 
FWLA = The address of the first word loaded 


Ree Last word of the relocation bits. Includes a bit for EPAj. 
BTA;] Address of first byte relocatable item in this overlay. 


Address of last byte relocatable item in this overlay. 


8.6 LIBRARY BUILDER (LIBBLD) 


The LIBBLD utility program builds library files for use by the DX980 Over- 
lay Link Editor (DXOLE). 


8.6.1 STANDARD JCL PROCEDURE 


The following listing is a standard procedure for LIBBLD: 


o# CREATE LIBBLD,COMMENT, "BUILD LIBRARY FILE . 

/REPLACE LIBBLD « BUILD LIBRARY FILE . 

JEXEC OBJa(1,SYSTEM,LIBBLD) MEM®(390,2900,1080) PRYYa(1,15)3 

/ TIMEse!l MEM3sMEM PRTYsepRI TIMEssTIM 

ASSIGN § MT1 DEVICEssDOBJ FILEssFOBJ BUFFERS#1 * OBJECT INPUT 


JASSIGN 6 SC _ DEVICESsDLST FILEssFLST SHARES#SLST BUFFERS#1.1DT/DEF LISTING 
/ASSIGN 9 DISC1 DEVICEssDLIB FILE:*FLI8 REPLACES =RLIBS . 


/ BUFFERS=s2 INDEXED ACCESS®(ANY,ANY,ANY,ANY)3 
/ ACCESStsCLIB ALLOCATEs(1,0/128,20) ALLOCATEs#LLIB) 
ae KEYLEN®8 ~ OUTPUT [.IB FILE 
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8.6.2 MEMORY PARTITION REQUIREMENTS 
Memory requirements of LIBBLD are: 


MEM = (300, 2000, 1000) 


8.6.3 LUN ASSIGNMENTS 


The LIBBLD utility uses three LUN assignments. Table 8-13 outlines the 
functions of each unit. 


Table 8-13. LIBBLD Logical Unit Assignments 


DS Provides object input for addition to the 

library file. The LIBBLD utility termi- 
nates when it finds an end of file in this © 
input. 


Provides a hard copy listing of the mod-_ 
ules (IDT names) and of the defined entry 
points within each module in the library. 


Assigned to a key indexed file with a key 
length of 8. This unit contains the 
library file to which the object modules 
will be added. 


8.6.4 OPERATION 


When using LIBBLD, all names must be unique. No two definitions and no 
two IDT names can be the same, The object modules in the library can all 
be added at one time or by several executions of LIBBLD. No object mod- 
ules can be replaced. LIBBLD checks for duplicate IDT names and duplicate 
entry point names. To redefine an object module in the library, the library 
must be entirely rebuilt, 


8.6.5 ERROR CODES 


LIBBLD error messages are literal and self-explanatory, These messages 
are as follows: 


DUPLICATE DEF NAME, FIRST DEF USED <def name> 
DUPLICATE KEY GENERATED FOR IDT 
LIBRARY IS FULL, NO MORE RECORDS CAN BE ADDED, 
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8.6.6 SAMPLE OUTPUT 


The resulting library file is an indexed data set that has the following logical 
organization of keys and associated data: 


QQIDT1 1700 IDT1 
1702. DEF1 DEF2 


DEF 1 QQIDT 1 
DEF2 QQIDT 1 


QQIDT2 1700 IDT2 
1702 DEF3 
1706 


DEF3 QQIDT2 


8,7 FILE COPY UTILITY (DXCOPY) 


The DXCOPY utility copies and saves data from any type of file or device to 
any other type of file or device, In addition DXCOPY can list the contents of 
a file ona printer, Control parameters for the utility specify or override 
optional functions of the utility. All of these parameters may be omitted to 
specify their default values, DXCOPY also generates keys for key indexed 


files. 


8.7.1 STANDARD JCL PROCEDURE 
The following listing is a standard procedure for DXCOPY: 


o# CREATE DXCOPY,COMMENT, "GENERAL PURPOSE COPY " 
/REPLACE DXCOPY « GENERAL PURPOSE COPY . 

JEXEC OBJs(1,SYSTEM,DXCOPY) MEM#(390,3700,2000) PRTY=(1,15)3 

/ TIMEs=] MEMSSMEM PRTYs=PRI TIMEseTIM 

/ASSIGN 5 DUMMY DEVICE: =DCON > CONTROL/MESSAGE 
/ASSIGN 6 DUMMY DEVICES=#DLST FILE:sFLST BUFFERS#1 . LISTING 

ASSIGN 7 DISC1 DEVICEssDOUT FILE:*FOUT REPLACE:®ROUT? 

/ BUFFERS#2 BUFFERSSsBOuT LINKSEQs#LIN RELRECtSREL3 

/ INDEXEDt#IND ACCESSSCANY,ANY,ANYSANY) ACCESS SCOUT? 

/ ALLOCATE®(1,0,128,18) ALLOCATE: sLOUT KEYLENS63 | 

/ KEYLEN:sKOUT LRECL#64 LRECL?*G0UT » OUTPUT 

ASSIGN 8 DISC1 DEVICESsDIN FILEsaFIN DELETEssTIN RBUFFERS#! . INPUT 

7END 


8.7.2 MEMORY PARTITION REQUIREMENTS 


The job area consists of space for the DXCOPY load module, Since DXCOPY 
is an overlaid program, this space contains the root segment plus the longest 
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overlay. If there is no listing (i.e. LUN 6 is assigned to DUMMY), the job 

area size may be specified as 2400, If listings are possible (i.e. LUN 6 as- 
signed to a printing device or file), then the job area size must be specified 

as 3700. 


The job extension area can be calculated according to the following formula: 


NF NB 
<jearea> = )> De (BS;+j) + 17(NT) + 7(NL) + SS + 11 
a ae ae 


where 
NF = Number of files assigned (0<NF< 3) 


NB = Number of buffers per file (1 NB<x depending on amount of 
blocking) 


BS = Physical record length in words of the individual files 


NT = 2 co-resident tasks if the listing LUN (6) is assigned to DUMMY; 
3 co- resident tasks if the listing LUN (6) is assigned a printing 
device or file 


NL = 4 LUNs assigned 
SS = 600 for dynamic TCB stack requirement if LUN 6 is assigned to 
DUMMY; 900 if LUN6 is assigned to a printing device or file 
Therefore, 


<jearea> = 673 + BB if LUN 6 assigned to DUMMY or, 
<jearea> = 990 + BB otherwise 


where: 


BB = total blocking buffer requirements for all files. 


A default of MEM=(300, 3700, 2000) has been used in the standard procedure 
which allows the listing option and 1000 words of file buffer space. 


8.7.3 LUN ASSIGNMENTS 


The utility program uses four logical unit number (LUN) assignments, as de- 
scribed in table 8-14. 
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Table 8-14. DXCOPY Logical Unit Assignments 


Control input 


Listing output 


Data output 


[o@) 


Data input 


8.7.4 OPERATION 


The DXCOPY utility is a multitask program that runs under DX980 in the 
protected mode, A minimum of two tasks run concurrently. A third task is 
created if a listing is possible (i.e. LUN 6 is assigned to other than DUMMY). 


The user enters any of the control parameters on LUN 5, The entry is in 
free format with one or more blanks between each parameter, All param- 
eters must be within the same record, For many cases, however, the de- 
fault values of the parameters produce the desired results so fhat none of the 
parameters need to be specified. If all of the control characters are entered, 
the input record is of the following form: 


<type>,<key specification>, <definition>, <rewind option>, TRIM, <list>. 


The following paragraphs describe each of these parameters and their default 
values, 


8.7.4.1 DATA TYPES AND CONVERSIONS, DXCOPY performs the re- 
quired file conversion and copying according to the type of input and output 
files without the data type (<type>) being given explicitly. However, certain 
types of copies do require explicit definition in order to perform the desired 
conversion, Data type specifies the format of the input. The output file data 
is dictated by the input data type and what kind of files are being used (key 
indexed, relative record, linked sequential, or other device), The following 
file types may be used for the <type> control parameter: 


e SOURCE: Source files may exist on any file type. This data type 
is the default value for linked sequential files and non-disc devices, 


e DATA: Data is the default data type when the input file is key in- 
dexed, The Data parameter must be stated if the input or output 
media is binary format paper tape, card, or cassette in order to 
obtain correct input conversion, 


e RELOBJ: Relocatable object is never the default data type. This 
parameter must be specified to verify checksum, or if the input or 
output media is cards, paper tape, or cassette, 
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e MEMI: Memory image is the default data type if either the input file 
Or output file is a relative record file. Memory image files exist in 
relative records files as two header words in the File Control Block 
and a group of 32 word records, When DXCOPY transfers the file 
to any other media, it generates a header record followed by data 
records and an end of file, Figure 8-5 illustrates the final format, 
The user must specify either Data or Source for copying relative 
record files that are not load module files. 


® SAVED: Saved data is created by copying a (key indexed) file toa 
file that is not a key indexed file. SAVED is the default data type 
when the input file is indexed and the output file is not indexed, A 
key specification input of NOKEYS overrides the creation of Saved 
files, Saved files consist of physical records of 72 characters or 
less, This organization allows large logical records to be trans- 
mitted on card media, (Figure 8-6 illustrates the format ofa 
Saved file, 


8.7.4.2 KEY SPECIFICATIONS, Key specification parameters allow the 
user to set the characteristics of the keys or to delete input keys in the out- 
put file. DXCOPY accepts the following words for key specification inputs: 


e KEYLEN=<nchar>: This parameter specifies the length of keys in 
characters, Default length key is 30 characters, 


HEADER MBE fo) E ee HEADE 
RECORE 180016 NU R F Hi EAD! Hes a CHECKSUM 
RECORD 


10 CHARACTERS 


DATA 
RECORD Eo } rcs | 


68 CHARACTERS 


THE DATA RECORD CHECKSUM !S THE SUM OF ALL DATA WORDS » THE 
HEADER WORD (180116) AND THE DATA RECORD NUMBER 


(A)130104 : pe 
Figure 8-5, Memory Image Format for Files 


Other than Relative Record 


PDAS ase WORD WORD BOUNDARY 


DATA 
181016 KEYLENGTH "4 TO 66 CHECKSUM 
ECORD DATALENGTH cratic ns CHARACTERS 
IF ANY 


WORD BOUNDARY 


RE- DATA 
CORDS ; dna La CHECKSUM 
2-n CHARACTERS 
72 ‘ 
CHARACTERS 
MAX, 


Figure 8-6, Saved File Format 


(A}130105 
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@ KEYPOS=<mchar>: This parameter specifies that a key should be 
generated for each record of input, starting at the character number 
given to the right of the equal sign (<mchar>), 


® NOKEYS: This parameter specifies that any keys found in the input 
file should not be transferred to the output file. This parameter 
overrides the Saved data specification, 


8.7.4.3 DEFINITION, The user can enter: 
FILES=<nfiles> 


to specify copying more than one set of data (delimited by an end of file) to 
the output file. The argument, <nfiles>, is either a number specifying how 
many data sets to copy, or an asterisk (*) to specify copying all data sets 
until an end of media is detected, All end of files are transmitted to the out- 
put file unless the output file is a key indexed or relative record file, These 
output file types cause DXCOPY to declare an error and abort when more 
than one file is transferred, 


8.7.4.4 REWIND OPTIONS, DXCOPY normally rewinds the input and out- 
put files before beginning the copy. However, the user can prevent rewinding 
the input file by specifying NOINREW, Similarly, entering NOOUTREW pre- 
vents rewinding of the output file, | 


8.7.4.5 TRIM OPTION, If the user enters TRIM for a control input, 
DXCOPY trims trailing blanks before copying to the output file. 


8.7.4.6 LISTING OPTIONS, If LUN 6 is not assigned to Dummy, DXCOPY 
generates two types of listings by default. The utility produces a source list 
if the data type is Source, or an identification listing if the data type is relo- 
catable object (RELOBJ)., In addition, the user can enter the following param- 


VOvenaewe Vw yew {eh ae NS rs Te 


eters to select printing of optional data: 
e RECNO: This parameter specifies printing of record numbers. 


8 KEYS: This parameter causes the keys to be listed, The key is 
assumed to be valid USASCII. This listing is printed in hexadecimal 
if the HEX parameter is also specified. 


e HEX: This parameter results in a hexadecimal listing. 


e ASCII: This parameter instructs DXCOPY to print the USASCII 
equivalent to the right of the hexadecimal listing. 


e WIDE: This parameter specifies that a 132 column printer is avail- 
able on LUN 6 instead of an 80 column printer. Hexadecimal dumps 
are then printed at 16 words per line instead of 8 words per line. 


8.7.5 ERROR CODES 


When an error occurs during processing, DXCOPY prints an error code on 
the terminal, Table 8-15 defines the error codes, 


el 
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Table 8-15. DXCOPY Error Messages 
Definition 


Unrecognizable parameter specified 

invalid number 

More than one data specification 

Key length not > 1 and < 32 

Invalid key position specified 

Trim cannot be specified with given (or default) data type 


When copying memory image data from a non-relative rec- 
ord file, the first record was not the expected header 
record. 


When copying memory image data from a non-relative rec- 
ord file, a non-memory image data record was detected 


When copying saved data, a record was found that was not 
an 1810 record when an 1810 was expected 


When copying saved data, a record was found that was not 
an 1811 record when an 1811 record was expected 


An unexpected end of file was detected 
An end of file was not found when an end of file was expected 
A logical error was detected when writing to an indexed file 


An embedded end of file was detected, but the output file is 
either relative record or indexed 


Checksum error 


8.8 PROGRAM DEBUG (DEB980) 


DEB980 is a standalone utility package that aids in debugging user programs 
without endangering system operation, The package includes commands that 
permit the user to modify or display contents of memory and registers, and 
control execution of the program being debugged. Control of execution may 
be either interactive or batch, and includes loading, setting of breakpoints, 
and specifying traces, Program instructions may be executed one at a time 
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to allow examination of results following each instruction. DEB980 is de- 
signed for debugging single tasking jobs and does not support the following 
SVCs: 


© 6 - Delete Task 
e 7 - Suspend Task 
e 8 - Post Event 

e 30 - Create Task 


® 37 - Load 

e 38 - Load and Relocate 

® 49 - Allocate Resource 

® 51 - De-allocate Resource 
e 129 - Start Job 


This program is completely documented in a separate manual: Model Model 960 


Computer and Model 980 Computer Debug User's Guide and Opeeetitig ins, In- 


structions, Part Number 942760-9701. 


o# CREATE DEB98A,COMMENT, "PROGRAM DEBUG AID ® 
/REPLACE DEBOBe e PROGRAM DEBUG aIn ,. 

/EXEC OBJs(1,SYSTEM,DEB98G) MEMN8(390,6000,609) PRTY#8(1,15)3 
/ TIMEsel MEMSSMEM PRTYsePRI TIMEssTIM 


/ASSIGN oF SC DEVICEs=DCIN 
/ASSIGN oF 1 SC DEVICE: eDMSG SYSTEM MESSAGE 
/ASSIGN oF2 DUMMY DEVICEssDCLST CONTROL LISTING 
ASSIGN 2F3 SC = DEVICErsDUMP FILEssFUMP BUFFERS=1 MEMORY DUMP 
/ASSIGN oF4 DISC] DEVICEs:sD0BJ FILEssFoBJ BUFFERS®1 RELOC OBJECT IN 


CONTROL INPUT 


~~ 


ve 


/ASSIGN = @ DUMMY DEVICE: sDEVe , USER PROG LUN @ 
/ASSIGN «4 DUMMY DEVICEssDEV4 FILereFIl4 BUFFERSA! » USER PROG LUN 4 
/ASSIGN 5 DUMMY DEVICEseDEVS FILEssFILS BUFFERS=1 » USER PROG LUN 5 
ASSIGN 6 DUMMY DEVICE:sDEV6 FILEssFIL6 BUFFERS®1 » USER PROG LUN 6 
/ASSIGN = 7 DUMMY DEVICE: sDEV7 » USER PROG LUN 7 
pods 8 DUMMy LUNOssLUNS pENECECaDEVe?’ - USER PROG LUN 8 
/ 


8.8.2 MEMORY PARTITION REQUIREMENTS 


The job area consists of space for the DEB980 load module plus space de- 
pendent on the program being debugged. The following formula specifies the 
job area size requirements: 


<jarea> = 3000 + PS + WA+ ST 


where 
3000 = DEB980 load module size 
PS = Size of user program object module being debugged 


WA = Work area for program being debugged 
ST = Storage for symbol table and commands 
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The job extension area can be calculated according to the following formula: 


NF NB 
<jearea>= )> »S (BS;+1) + 17(NT) + 7(NL) + SS + 11 
Lis sh; aes) 


where 
NF = Number of files assigned 


NB = Number of buffers per file (1 < NB< x depending on amount of 
blocking) 


BS = Physical record length in words of the individual files 
NT = 1 co-resident task 
NL = 5+ number of user program LUNs 
SS = 300 for dynamic TCB stack requirement 
Therefore 
<jearea> = 363 + 5(UL) + BB 


where UL = Number of user program LUN's; BB = total blocking buffer re- 
quirements for all files. 


A default of MEM=(300, 6000, 600) has been used in the standard procedure. 
8.8.3 LUN ASSIGNMENTS 
NOTE 


- Unlike most utility programs, DEB980 LUN assign- 
ments are hexadecimal numbers, 


Table 8-16 lists the logical unit (LUN) assignments for the DEB980 program. 
In addition, all LUN assignments used in the user program being Faecee must 
also be assigned to the DEB980 program, 

8.8.4 OPERATION 


Refer to the Debug User's Guide for a description of program operation, 


8.8.5 ERROR CODES 


Refer to Section VI of the Debug User's Guide for a description of error 
codes and messages generated by DEB980. 


8.8.6 SAMPLE INPUT 


Refer to the Debug User's Guide for sample input format, 
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Table 8-16. DEB980 Logical Unit Assignments 


Control input 


Inputs debug commands 


Control log Displays operation messages, error mes- 
sages, simulation termination messages, 


and command requests 


F2 Input log Lists commands entered on control input | 


1 
: device 
F316 Dump and Prints dump and trace messages 


trace output 


F416 Program input ‘Inputs object program being debugged. 
This file must be direct output either from 
| the assembler or from DXOLE in the Com- | 


8.8.7 SAMPLE OUTPUT 
Refer to the Debug User's Guide for sample output format. 


8.9 SYMBOLIC ASSEMBLER (SAPG) 


The general assembler, SAPG, translates 980 symbolic assembly language 
into object language acceptable to the Model 980 Computer, SAPG is a two 
pass assembler, During Pass 1, a symbol table is generated as the source 
program is read, Pass 2 generates the object output and program listing 
using both the source program and the generated symbol table, More de- 
toiled characteristics of the 980 assembler are described in the Model 980 


COLEUS VLA WU EU Liv baw Ys Visiw SYVY WHS wees ve we ee ee ae tee 


Computer Assembly Language Programmer's Reference Manual, Part Num- 
ber 943013-9701, 


8.9.1 STANDARD JCL PROCEDURE 


Standard JCL procedures are listed below for the single job step assembly 
job and for the 3-step assemble, link and go job sequence, 
e# CREATE ASMBLR,COMMENT, "ASSEMBLE 


/REPLACE ASMBLR e ASSEMBLE . 

JEXEC OBJs(1,SYSTEM,ASMBLR) MEM*(3a0,5900,1000) PRTY#(1,15)3 

/ TIMEeei MEMSsMEM PRTYsg2PRI TIMEssTIM ; 

/ASSIGN @ DUMMY DEVICES sDMSG SHARE : » SYSTEM MESSAGE 
/ASSIGN 4 DUMMY DEVICEssDCON SHARE? aSCON » CONTROL/MESSAGE 
/ASSIGN § DISC1 DEVICEssDSRC FILEs*FSRC BUFFERSS! - SOURCE INPUT 
ZASSIGN 6 SC DEVICES sDLST FILEssFLST SHARES eSLST AUFFERS#1.SOURCE I.IST/ERROR 
/ASSIGN 7 OSC1 DEVICEssD0BJ FILEssFOBJ NEWssNOBJs 

/ REPLACE3:#ROBJ BUFFERSs1i LINKSEQs) 

/ ACCESS®(ANY,ANYsANYeANY) ACCESS3 8COBJ3 


/ ALLOCATE#(1,0,64,10) ALLOCATES #LOBJ . OBJECT OUTPUT 
JASSIGN 16 OJS$Ci FILES(TEMP,SCRL) NEW BUFFERS=1 LINKSEQ) 

/ ACCESS®(ANY,ANYeANYSANY) ALLOCATE#(108,306,256,38) . SOURCE SCRATCH 
/END 

(Continued on next text page) 


eer SS 
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(Continued from previous text page) 


»# CREATE ASMLGO,COMMENT, "ASSEMBLE, LINK, AND GO a 
/REPLACE ASMLGO « ASSEMBLE, LINK, AND GO. 

/JEXEC OBJe(1,SYSTEMsASMBLR) MEM®(390,5000,1008) PRTY=(1,15)3 

/ TIMEse{ MEM:sMEMA ; 

/ASSIGN @ DUMMY DEVICEss0MSG SHARE » SYSTEM MESSAGE 
/ASSIGN 4 DUMMY DEVICEs*DCON SHARES sSCON « CONTROL /MESSAGE 
/ASSIGN § DISCi DEVICE:sDSRC FILEssFSRC BUFFERS#1 » SOURCE INPUT 
/ASSIGN 6 SC DEVICE:sDLSTA FILEssFLSTA BUFFERS#1 . SOURCE |.IST/ERROR 
/ASSIGN 7 DISC FILESCTEMP,OBJECT) NEW BUFFERS=1 LINKSEQ) 


/ ACCESS®CANY,ANY,ANYeANY) ALLOCATE®(10,300,64,10) . OBJECT OUTPUT 
/ ASSIGN 16 DISC{ FILE#(TEMP,SCRL) NEW BUFFERS=1 LINKSEQ? ; 
ACCESS®(ANYSANY*ANY,/ ANY) ALLOCATE#(18,320,256,38) . SOURCE SCRATCH 
TEXEC OBJ=(1,SYSTEM,OXOLE) MEM#(300,12908,3008) PRTY=(1,15)) 


/ TIMEse{ MEM3SMEML ; 
ZASSIGN § DISCI1 FILESCTEMP,OBJECT) DELETE BUFFERS#1 e PRIMARY INPUT/CON 
ASSIGN 6 SC DEVICESsDLSTL FILEssFLSTL BUFFERS#®1 LOADMAP LLIST/ERR 
/ASSIGN 8 OISC1 FILESCTEMP,LM) NEW BUFFERS#{ RELREC LRECL#645 

/ ACCESSS(ANY,ANYsANYSANY) ALLOCATE®(10,580,32.10) ,. LOAD MOD OUTPUT 
/ASSIGN 9 OUMMY - LIBRARY FILE 
/ASSIGN 18 OI8C1 FILE®(TEMP,SCRL) DELETE BUFFERS#1 LINKSEQ SCRATCH 
/ASSIGN 13 DISC FILES(TEMP,SCRR) NEW DELETE BUFFERS#4 RELRECS 

/ ACCESS#(ANYsANYsANYSANY) ALLOCATES (10, 398,128, 18)3. 

/ LRECL #100 - RELREC SCRATCH 
/EXEC OBJUs(1,TEMP.LM) MEMs(380-4900,1980) PRTY®(1,15)3 

/ TIMES1@@ MEMtsMEMG TIMEsaTImMG 

/ASSIGN 4 DUMMY DEVICES sDEV4 FILEssFIL4 BUFFERSs2 ° USER PROG LUN 4 


/ASSIGN § SC DEVICEssDEV5 FILEssFILS BUFFERSs2 USER PROG LUN 5 
ZASSIGN 6 SC DEVICEssDEV6 FILEssFIL6 BUFFERS#2 USER PROG LUN 6 
/ASSIGN 7 DUMMY DEVICESsDEV7 . USER PROG LUN 7 
“ENO 


 “. 


8.9.2 MEMORY PARTITION REQUIREMENTS 


The job area consists of space for the load module of the assembler and any 
work space required by the assembler for symbol table storage, The number 
of words required for a single symbol table entry is a function of the number 
of characters in the symbol as shown in table 8-17. The job area require- 
ment may be calculated using the following formula: 


<jarea> = 3650 + 3(S12) + 4(S34) + 5(S56) 


where: 
3650 = SAPG load module size 
S12 = Number of symbols in table with a 1 or 2 character length 


S34 = Number of symbols in table with a 3 or 4 character length 
S56 = Number of symbols in table with a 5 or 6 character length 


A job area size of 5000 words will allow the assembly of a program with as 
many as 270 symbols, 
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Table 8-17. Symbol Table Memory Allocation 


Symbol Length Words Required 
in Characters in Symbol Table 


The job extension area can be calculated according to the following formula: 


NF NB 
<jearea>= }) > (BS:+1) + 17(NT) + 7(NL) + SS + 11 
tek 371 
where 
NF = Number of files assigned (0 < NF < 3) 


NB = Number of buffers per file (1< NB < x, depending on amount of 
blocking) 


BS = Physical record length in words of the individual files 


NL = 6 LUNs assigned 
SS = 300 for Dynamic TCB stack requirement 
Therefore, 


<jearea> = 370 + BB 


where BB is the total blocking buffer requirements for all files. 


To assemble a program using the standard JCL procedure provided previously 
in this section using input and output files having physical record lengths of 
256 words or less, a job extension area of 1000 words is adequate, 


8.9.3 LUN ASSIGNMENTS 


Table 8-18 lists the logical unit assignments for the assembler. 


i  ———————— 
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Table 8-18, SAPG Assembler Logical Unit Assignments 


System error messages 


Any printing device 


Messages and control Any input/output device 


Source input Any input device/file. If not re- 


windable, LUN 16 must be assigned 
to a rewindable device/file, or in- 
put must be manually input twice. 


Output listing and Any printing device/file 


error messages 


Relocatable object output Output device/file 


Temporary storage of Any input device/file. If rewind- 
able, it is used as input to Pass 2; 
if not rewindable, LUN 5 provides 


input to Pass 2, 


source input 


8.9.4 OPERATION 


The SAPG assembler is a single-task program that runs under DX980 in the 
protected mode. Figure 8-7 illustrates the operation and LUN assignments 
for SAPG,. The assembler first determines if the source input (LUN 5) is re- 
windable, Ifit is not rewindable, SAPG prints the message: 


READY SOURCE, HIT C/R 


on LUN 4. When this message appears, the operator should ready the source 
device, if necessary, and then select a carriage return on LUN 4, This con- 
trol interaction can be eliminated by assigning the message and control (LUN 
4) to DUMMY. Pass 1 reads the source from LUN 5 until it reads a record 
containing an END directive. After the END is processed, Pass 1 terminates 
and Pass 2 begins. 


Pass 2 obtains the source input from one of two sources: 


1) If LUN 16 has been assigned to a rewindable device or to a file, 
Pass 1 copies the source input to LUN 16 and Pass 2 uses LUN 16 
for its input. 


2) If LUN 16 has been assigned to a non-rewindable device, Pass 2 
uses the primary source input, (LUN 5) for input. If LUN 5 is as- 
signed to a rewindable device or toa file, Pass 2 automatically re- 
winds LUN 5, If LUN 5is not rewindable, the source input control 
message: 


READY SOURCE, HIT C/R ° 
is again printed to LUN 4, After repositioning the source in LUN 5, 


select carriage return, 


a a 
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, SYSTEM 


ERRORS 
LUN O 


PASS 1 
BUILD TABLES 


PASS 1 
ERROR LiST 
LUN 6 


SOURCE 
OUTPUT 
TO DISC 


SYSTEM 
ERRORS 
LUN 0O 


PASS 2 


1. PROCESS FIELDS. 
2. OUTPUT MACHINE 

LANGUAGE EQUIVALENT. 
3. LIST ERRORS. 


SOURCE INPUT 
LUN 5 


LIST OUTPUT 
AND ERRORS 


LUN 6 


MESSAGES 
AND CONTROL 
LUN 4 


RELOCATABLE 
OUTPUT 
OBJECT 


zy 


LUN 
NOTE: SOME FUNCTIONAL BLOCKS INDICATE THAT ey 
A REWIND IS REQUIRED BEFORE PROCESSING 
MAY CONTINUE, THE REWIND CAPABILITY R 
1S DEFINED AS FOLLOWS. 


AUTOMATIC REWIND 
t- ©) 


MANUAL REWIND 


tet] 


SAPG Assembler Functional Diagram 


(A)130097 


Figure 8-7, 
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Pass 2 produces a listing and the bulk of the object output, and terminates 
processing when it encounters an END directive. At that time Pass 1 re- 
starts, The SAPG assembler continues to process source inputs terminated 
by an END directive and generates corresponding output object modules until 
it reads an End of File (EOF) record (/*) to terminate the assembly. It then 
outputs an EOF record and trailer at the end of the object output to indicate 
assembler termination, To execute any object program under DX980, the 
module must be linked using the link editor, DXOLE, 


8.9.5 ERROR CODES 


When SAPG reads the source program, it may detect format errors, Detec- 
tion of an error prints a diagnostic message on LUN 6. If the error is de- 
tected in Pass 1, the message appears before the listing. If the error is de- 
tected in Pass 2, the message is printed adjacent to the source line in question. 
A total number of errors encountered in the assembly is given at the end of 

the listing, Table 8-19 lists the possible error messages printed by SAPG, 


8.9.6 SAMPLE INPUT 


Figure 8-8 illustrates the source input to the SAPG assembler. 


8.9.7 SAMPLE OUTPUT 


Figure 8-9 illustrates the object module output from the SAPG assembler. 


8.10 FORTRAN IV COMPILER 


The FORTRAN compiler furnished with the DX980 operating system exceeds 
the specifications set forth in the American National Standards Institute pub- 
lication number USAS X3.9-1966. The FORTRAN compiler is a l-pass, 2- 
phase compiler that outputs an intermediate pseudo object of tables and link- 
age information at the end of Phase 1, Using the mass storage capability of 
the DX980 system, the operator need not handle the pseudo object output. 
More detailed characteristics of this compiler are described in the FORTRAN 
manual referenced in the Preface to this manual. 


8.10.1 STANDARD JCL PROCEDURE 


Standard JCOL procedures are listed below for the 2-step FORTRAN compile 
job sequence (Phase 1 and Phase 2) and for the 4-step FORTRAN compile, 
link and go job sequence. This procedure does not permit searching of any 
alternate, user-supplied libraries other than the standard FORTRAN library. 
To enable additional searches, a separate JCL procedure must be written 
with modifications to the job step portion of DXOLE. These modifications in- 
clude assignment of the object module (TEMP, OBJECT) to an unused LUN, 
assignment of the alternate library file to another unused LUN, and assign- 
ment of the required DXOLE control commands (either ina file or from an 
input device) to LUN 5. 
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o# CREATE FINPS1,COMMENT,"FORTRAN PHASE 1 COMPILE " 
/REPLACE FYNPS{ » FORTRAN PrHaSE 4 COMPILE , 
/EXEC OBJa(1,SYSTEM,FTN) MEMs(30g,8080,1000) PRTY#(1,15)3 


/ TIMEsel MEM2*MEM PRTYe@PRI TIMEssTIM 

/ASSIGN @ DUMMY DEVICE sDMSG SHARE i SYSTEM MESSAGE 
/ASSIGN § DISCt DEVICE: sDSRC FILE3sFSRC BUFFERS#1 ". SOURCE INPUT 
/ASSIGN 6 SC DEVICE =DLST FILFE:sFLST SHARESeSLST RUFFERS®{.SOURCE |.IST/ERROR 
/ASSIGN 7 DISC1 DEVICESe0INT FILEseFINT BUFFERS®1 LINKSEQ; 


/ ACCESSS(ANY,ANYsANYZANY) ALLOCATE®(1,0,64,30)3 ~ SOURCE SCRATCH 


to NEWssNINT REPLACESsRINT ACCESSssCINT ALLOCATE: sLINT 

/END 

o* CREATE FYINPSZ,COMMENT, "FORTRAN PHASE 2 COMPILE a 

/REPLACE FINPS2 « FORTRAN PHASE 2 COMPILE , 

EXEC OBJs(1,SYSTEM,FINPS2) MEM®(390,8900,1000) PRTYY"(1,15)}3 

/ TIMEse{ MEM2sMEM PRTY gsPRI TIMEseTIM 

ASSIGN @ DUMMY DEVICE3®DMSG SHARE ". SYSTEM MESSAGE 


/ASSIGN 6 SC DEVICEseDLST FILEssFLST SHARES @SLST BUFFERS81.ERROR MMSSGR5 
/ASSIGN 7 DISC1 DEVICErs00BJ FILE:sFOBJ BUFFERSs1 LINKSEO; 


/ ACCESS®(ANY,ANYZANYSANY) ALLOCATE&(1,0,64,10)3 . OBJECT OUTPUT 

/ NEWssNOBJ REPLACEssROBJ ACCESS: sCOBJ ALLOCATEssLOBS 

/ASSIGN 8 DISC1 DEVICEssDINT FILFeeFINT BUFFERS21 . INTERMED ORJECT 
“END 


o# CREATE FTNLGO,COMMENT, "FORTRAN COMPILE, LINK,AND GO* 


/REPLACE FINLGO « FORTRAN COMPILEs LINK, AND GO, 
/EXEC OBJs(1,SYSTEM/FIN) MEM@(30g,10009,1000) PRTY=(1,15)) 
/ TIMEsel, MEMBSMEMC 


SYSTEM MESSAGE 
SOURCE INPUT 
SOURCE |.IST/ERROR 
INTERMED ORJECT 
SOURCE SCRATCH 


~*~ ° 


/ASSIGN @ DUMMY DEVICESs0MSG SHARE 

/ASSIGN 5 DISC! DEVICEteDSRC FILEssFSRC BUFFERSS#! 

/ASSIGN 6 SC _ DEVICEssDLST1 FILEssFLST BUFFERS#! 

gente 7 Drset FILEsCTEMP.PHASE!) NEW BUFFERSs!1 LINKSEQ?s 
ACCESSB(ANY,ANYSANYCANY) ALLOCATES (10,5800,64,50) 

/ExEC OBJs(1,SYSTEM,FINPS2) MEM=(390,8908,1000) PRTYS(1.15)5 


TIMEsel MEM3 ®@MEMC 


~~» v 


~- 
. 


/ASSIGN @ DUMMY > SYSTEM MESSAGE 
/ASSIGN 6 SC DEVICE: sDLST2 . ERROR MESSAGE 
/ASSIGN 7 DISC1 FILES(TEMP,OBJECT) NEW BUFFERSs1! LINKSEQ? 

/ ACCESS®(ANY,ANY,ANYSANY) ALLOCATES (10,300,64,10) , OBJECT OUTPUT 
/ASSIGN 8 DISC1 FILES(TEMP,PHASE1) BUFFERS#1 . INTERMED OBJECT 
/EXEC OBJs(1,SYSTEM,DXOLE) MEM#(309,12908,3000) PRTY#(1,15)5 

/ TIMEsel MEMS SMEML 

/ASSIGN 5 DISCi FILES(TEMP,OBJECT) DELETE BUFFERS#1 ~ PRIMARY INPUT/CON 
/ASSIGN 6 SC -DEVICEreDLSTL FILErsFLST BUFFERS#1 . LOADMAP ILIST/ERR 
/ASSIGN 8 OISC1 FILES(TEMP,LM) NEW BUFFERS#1 RELRECS 

/ ACCESS® (ANY, ANY, ANY/ANY) ALLOCATE #(10,308,32,19)% . LOAD MOD OUTPUT 
/ LRECL 864 

/ASSIGN 9 DISC1 FILE®(SYSTEM,USRFTN) BUFFERSS2 > LIBRARY 

/ASSIGN 1@ DISC’ FILE®(TEMP.PHASE1) DELETE BUFFERS#1 . LINKSEQ SCRATCH 
/ASSIGN 13 DISC1 FILES(TEMP,SCRR) NEW DELETE BUFFERS#1 RELRECS 

/ ACCESS®(ANY,ANY,ANY*ANY) ALLOCATE®(10,300,128,10)}. RELREC SCRATCH 

/ LRECL#102 

7EXEC OBJe(1,TEMP,LM) MEM=(300,8900,1008) PRTV#(1,15)3 

/ TIMEz{@@ MEMs=sMEMG TIME ss TImoG 


/ASSIGN ® SC DEVICEr=DMSG SYSTEM MESSAGE 


~~ .,? 


/ASSIGN +B@ SC DEVICE: sDEVO USER LUN @ 
/ASSIGN »B1 DUMMY DEVICEssDEVi » USER LUN 1 
/ASSIGN »BS SC DEVICEssDEVS FILEssFILS BUFFERS#2 » USER LUN SeINPUT 
/ASSIGN 286 SC DEVICEssDEV6 FILEssFIL6 BUFFERS#2 « USER LUN 680UTPUT 


/ASSIGN -B8 DISC! FILES(TEMP,SCRL) NEW BUFFERS#1 LINKSEQS 
ACCESSSCANY, ANY, ANY*ANY) ALLOCATE®(10,308.32,10) . USER SCRATCH FILE 


/ 
“END 
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Table 8-19. SAPG Error Messages 


Message 
M 


FIELD SZ 


UNDF OP 


LONG SYM 
MDF O/F 

FRM > 16 

CAD > 10 

UNDF SYM 
MDF SYM 

RELOC 


SYM OVF 


BAD NUM 


IMP R/D 


X RF USE 


IXB ERR 
OPD ERR 
ADR MODE 


Meaning (and Corrective Action) 


Address beyond reach (use @ for extended 
format) 


Undefined operation code (check list of valid op 
codes) 


Symbol > 6 characters 

OPD or FRM multiply defined (rename label) 
FRM fields contain more than 16 bits 
Address expression > 10 elements 

Symbol not defined (label probably omitted) 
Symbol multiply defined (rename labels) 


A relocation error (use only relocatable label in 
arithmetic expression, or ORG statement can 
use only one relocatable label) 


Too many symbols have been defined (cut out 
symbols or divide program) 


Numeric element not valid (properly define 
item in label or address field) 


A REF or DEF symbol has been used improperly 
(REF symbol defined inside and outside the pro- 
gram; DEF symbol not defined in the program) 


A REF symbol has appeared invalidly in an un- 
relocatable expression . 


Address mode error (improper use of IXB field) 
No such OPD format number 


Illegal addressing mode (improperly written ad- 
dress) 


i 
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/* (EOF) 


Ss | 


IDT 
END | 


(A)1 30396 


Figure 8-8. Assembly Language Source Input to SAPG 
/* (EOF) 
| e | 
€ 
e 


703] 


[1 
1702 


[1701] 
1700 
f END (1706) | 
TEXT (1704) | 
EXT REF'S 
1703)] - 
ENTRY POINTS 
(1702) 


COMMON 
1701)] 


00 RECORD) 


(A)130397 


Figure 8-9. Object Module Output from SAPG 
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8.10.2 MEMORY PARTITION REQUIREMENTS 


The job area required to run Phase 1 and Phase 2 of the FORTRAN compiler 
consists of space for the load modules as well as dynamic workspace. For 
Phase l, this job area is defined by the equation: 


<jarea>] = LM, + WS} 


where 


LM, = 6650 (Phase 1 compiler load module size) 
WS] = workspace required (program size dependent) 


A job area size of 8000 words for the Phase 1 compilation job step allows for 
compiling a small FORTRAN program, For Phase 2, the job area size is 
defined by the equation: 


<jarea>2 = LM, + Ws, 
where 
<jarea>z = job area size for Phase 2 
LM? = 2800 (Phase 2 compiler load module size) 


WS> = workspace required (program size dependent) 


A job area size of 8000 words for the Phase 2 compilation job step allows 
for compiling a small FORTRAN program, 


The job extension area can be calculated according to the following formula: 


NF NB 
<jearea>= YD DD (BS, + 1) + 17(NT) + 7(NL) + SS+ 11 
i=l j=l 


where 
NF = Number of files assigned to the job step (0 < NF < 3) 


NB = Number of buffers per file (0 < NB< x, depending upon amount of 
blocking) 


BS = Physical record length in words of the individual files assigned to 


the job step 


NT = 1 co-resident task 

NL = 4 LUNs assigned to the compiler 

SS = Dynamic TCB stack requirement (300 for compiler) 
Therefore, 


<jearea>= 356+ BB 
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where BB is the total blocking buffer requirements for all files assigned to 
the job step, For compiling the previously listed standard JCL procedure 
using input and output files having physical record lengths of 256 words or 
less, a job extension area of 1000 words is adequate, For Phase 2, the re- 
quired jearea is also 1000. 

8.10.3 LUN ASSIGNMENTS 

Tables 8-20 and 8-21 list the logical unit assignments for the Phase 1 and 


Phase 2 FORTRAN compiler job steps, respectively. 


Table 8-20. FORTRAN Compiler Phase 1 LUN Assignments 


System error messages Any input/output printing device 
Source input Any input device/file 


Output listing and Any printing device/file 
error messages 


Output to Phase 2 Output device/file 


System error messages Any input/output printing device 


Output listing and Any printing device/file 


eSeliva s41vVnuoerErerv 


Relocatable object out- Output device/file 
put 


Input from Phase 1 Any input device/file | 


8.10.4 OPERATION 


The FORTRAN compiler is a single-task program that runs under DX980 in 
the protected mode, The compilation of a FORTRAN program consists ofa 
2-step job: Phase 1 and Phase 2 compilations. Figure 8-10 provides a func- 
tional diagram of the FORTRAN compiler, including LUN assignments. 


The FORTRAN Phase 1 compiler first determines if the source input (LUN 5) 
is rewindable. If it is not rewindable, the compiler prints the message: 


READY INPUT, HIT C/R 


a re EE 
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se FORTRAN PHASE 1 
coh 0 1. SYNTAX SCAN SOURCE LIST 
2. BUILD SYMBOL LUN 6 


TABLES 
3. ALLOCATE MEMORY 


4. SOURCE LIST WITH 
ERROR MESSAGES PSEUDO-OBJECT, 


5. OUTPUT PSEUDO- {CONSTANTS 
AND LINKING 


OBJECT 


NOTE: 

SYSTEM LOGICAL UNITS CORRESPONDING TO 
FORTRAN UNITS THAT HAVE BEEN USED INA 
FORTRAN PROGRAM MUST BE ASSIGNED TO 
APPLICABLE PHYSICAL DEVICES BEFORE THE 
FORTRAN PROGRAM IS RUN. THESE SYSTEM 
RUN-TIME UNITS ARE LISTED IN THE FOLLOWING 
TABLE; 


FORTRAN RUN-TIME LOGICAL UNITS 


FORTRAN UNIT 


ERROR 


MESSAGES 
LUN O 


FORTRAN PHASE 2 
1. CREATE BASE PAGE 
CONSTANTS 
2. CREATE PAGING 
CONSTANTS 
3. OVERFLOW CHECK 
4. OUTPUT LINKABLE 
OBJECT 


PHASE 2 


INPUT 
LUN 8 


(A)130106 


Figure 8-10. FORTRAN Execution Functional Diagram 


When this message appears, the operator should ready the source 


on LUN 0. 
Phase 1 then reads the 


device and then select a carriage return on LUN 0. 
source input and outputs an intermediate pseudo-object of tables and linkage 
If after the END statement of a subprogram Phase 1 


information to LUN 7. 
**) as the first two characters, 


encounters a record containing two asterisks ( 
it produces delimiting characters for Phase 2 and restarts itself to process 
This procedure compiles several subprograms 


an additional subprogram, 
Once Phase 1 encounters an End 


with a single application of the compiler. 
of File (EOF) record (minimally a /*), Phase 1 terminates and Phase 2 be- 


gins. 


The FORTRAN compiler Phase 2 determines if the intermediate object input 


is rewindable, If the input is not rewindable, the compiler prints the mes- 


sage: 
READY INPUT, HIT C/R 

on LUN 0. When this message appears, the operator should ready the input 

device (LUN 8) if necessary, and then select a carriage return on LUN 0. 


Phase 2 then reads the intermediate object and completes the compilation 


process, If no errors occur in this process, Phase 2 prints the message: 


COMPILATION COMPLETE 


on LUN 6, 
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The object code produced by 980 FORTRAN is in relocatable format suitable 
for input to the link editor, DXOLE, The program ID for the object mod- 

ule is taken from the name of the function or subroutine subprogram, The 
name cannot exceed six characters inlength, Ifitis less than six charac- 
ters, the name field is right filled with blanks, Those programs that are 

not identified as functions or subroutines are automatically named bBMAIN}. 
DXOLE does not recognize an IDT name beginning with 6 (blank space) within 
an Include control record, Therefore, DXOLE cannot access a main pro- 
gram produced by the FORTRAN compiler from within an indexed file by using 
the keyname. 


The object output from Phase 2 is ready for linkage editing with the FORTRAN 
library to acquire any library modules referenced in the program, The 
FORTRAN library contains a collection of commonly used subprograms typi- 
cally referenced by programs generated by the FORTRAN compiler, The 
library is provided to DX980 users in the form of a key indexed library file 
identified as (SYSTEM, USRFTN). Assign this library file to LUN 9 of the 
DXOLE job step for most efficient linking. The output load module from 
DXOLE may then be executed. The FORTRAN runtime package adds a value 
of B01¢ to the LUN of all user 1/0 requests. For example, if a user pro- 
gram specifies an output for LUN 6, the JCL needed to execute the load mod- 
ule must assign LUN B66 to the program. FORTRAN runtime error mes- 
sages (explained in paragraph 8.10.5) are printed on LUN 0. Therefore, the 
JCL procedure for executing any FORTRAN program must also assign LUN 0. 
The standard JCL procedures provided in paragraph 8.10.1, illustrate the 
assignment of LUN 0 for these error messages. 


8.10.5 ERROR CODES 


Error messages may originate from several sources in the FORTRAN com- 
pile, link and go sequence, Tabie 8-22 iists the error codes generated by the 
FORTRAN compiler Phase 1, Table 8-23 lists the error codes generated by 
the FORTRAN compiler Phase 2, Table 8-24 lists the error codes generated 
by the FORTRAN runtime library. These codes can be produced during the 


actual execution of the load module. 


Table 8-22. FORTRAN Compiler Phase 1 Error Messages 


Line- by- Line Messages 


SYNTAX 


Erroneous punctuation or illegally con- 
structed arithmetic expression, 


A constant or label is too large or is in- 
correctly constructed, 


NUMBER 


ee a eer ea A a Te oe ae ae ee 
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Table 8-22, FORTRAN Compiler Phase 1 Error Messages (Continued) 


ID CONFLICT The identifier marked is being used ina 
context which contradicts a previous ex- 
plicit or implicit declaration, 


TYPE CONFLICT 


The identifier or expression marked is in 
conflict with another identifier or ex- 
pression, 


MODE The identifier or expression marked has a 


type in conflict with the context, 


SUBSCRIPTS The number of subscript expressions used 
in an array does not equal the number de- 


clared for the array. 


ALLOCATION A non-dummy variable has been given as an 
adjustable dimension, or a variable has 
been placed in COMMON more than once, 
or a dummy variable appears ina 


COMMON or EQUIVALENCE statement, 


The statement appears in the program ata 
point in violation to the stated rules govern- 
ing the order of appearance of statements in 
the program, 


The statement must have a label in order to 
be reached or referenced, 


MISSING LABEL 


The number of items in the data list ofa 
DATA statement is not equal to the number 
of items in the variable list. 


DATA COUNT 


BLOCK DATA 


An executable statement appears ina 
BLOCK DATA subprogram. . 


OVERFLOW The statement caused the compiler capacity 
to be exceeded, Compilation does not con- 


tinue, 


End-of-Compilation Messages | 


LABEL ERRORS 


Labeling a Do loop structure errors, The 
message is followed by a list of statement 
numbers, 


ALLOCATION ERRORS Memory allocation errors, The message 
is followed by a list of identifiers to which 
memory cannot be allocated, due to pro- 


gramming errors, 
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Table 8-23, FORTRAN Compiler Phase 2 Error/Termination Messages 


INCORRECT FORMAT 


The Phase 1 output contains a format error 
PROGRM OVER 
BSPAGE OVER 


The program exceeds Phase 2 capacity 


The base page exceeds the capacity allotted 


INVALID CODE The Phase 1 output contains a code not 
recognized by Phase 2 
FIELD SIZE ERROR The IAL statement on the indicated line 
referenced a location that is not directly 
addressable, 
COMPILATION ABORTED - Error encountered in intermediate object 
| PASS 1 ERROR input from Phase 1 | 
| ERRORS - COMPILATION | Errors encountered in Phase 2. | 
ABORTED | 
PROGRAM END .| Phase 1 output successfully input to Phase | 


LD 
| | 


COMPILATION COMPLETE } No errors encountered in either phase 


Table 8-24. Runtime Error Messages 
NOTE | 


The user program is terminated in all cases except 
the **W ARNING** condition, 


ILLEGAL FORMAT Illegal character encountered in runtime 
ILLEGAL INPUT Illegal character encountered in input 
CHARACTER stream during READ execution, 
FORMAT PARENTHESIS Runtime format statement contains un- 

; ERROR balanced set of parenthesis, 


UNDER/OVER FLOW Real number in input stream or result of a 
floating point operation is outside range of 


numbers allowed, 


CHARACTER format statement, 
| 
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Table 8-24. Runtime Error Messages (Continued) 


1k WARNING** RECORD 
SIZE ERROR 


User program attempting to input or out- 
put record containing greater than 132 char- 
acters, 


INPUT (OUTPUT, REWIND, 
BACKSP, ENDFILE) UNIT 
LIMIT ERROR 


I/O was attempted on a FORTRAN unit 
greater than 7, 


OUT OF DATA End-of-file encountered during a READ op- 


eration, 


ERR, OR WRTBIN 
(WRTBCD, REDBCD, 
REDBIN, ENDFIL, REWIND, 
BACKSP) COMM IGND ON 
UNIT BO (1, 2,..., 7) JOB 
ABORTED 


Hardware error, or attempted operation is 
illegal on device specified, i,.e., rewind 
card punch is illegal. 


DIVIDE CHECK An attempt was made to perform a floating- 


point division by zero, 


8.10.6 SAMPLE INPUT 


Figure 8-11 illustrates input format for the FORTRAN compiler. 


e 
e 
e 
f END | 
UBP 
** 
| END | 


MAIN FORTRAN | 
PROGRAM 


(A)130399 


Figure 8-11. FORTRAN Source Input to FORTRAN Compiler 
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8.10.7 SAMPLE OUTPUT 
Figure 8-12 illustrates output format from the FORTRAN Compiler, 


/* (EOF) 


(1701-1705 
RECORDS) 


IDT SUB1 
(1700 RECORD) 


END (1706 
RECORD) 


(1701-1705 
RECORDS) 


T BMAINB 


MAIN 
700 RECORD) 


1D 
(1 


a 


(A)130400 


Figure 8-12, Object Module Output from FORTRAN Compiler 


8.11 LOAD MODULE UPDATE (LMUPDT) 


This utility updates an unplanned overlay on a load module file, The new 


overlay must have been link edited as a subsystem using DXOLE, The rela- 
tive record file of the new overlay must contain a directory entry for the 
overlay, a dummy root phase, and the new overlay. Use the following con- 


trol cards for DXOLE: 


b SUBSYSTEM OVLY Subsystem Mode, Overlay 
b ROOT MAIN, Dummy Root Phase 
b SEGMENT 1 Level 1 Overlay 
Object Deck Overlay 1 
6b SEGMENT i Level 1 Overlay 
Object Deck Overlay 2 


(listing continued on next text page) 


rE — — — —————————— 
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(listing continued from previous text page) 


b SEGMENT 1 Level 1 Overlay 


Object Deck 
[* End of File Terminates DXOLE Input 


- 


Overlay n (n Load Modules to be Updated) 


8.11.1 STANDARD JCL PROCEDURE 


The following listing is a standard procedure for LMUPDT: 


»# CREATE LMUPDT,COMMENT, "LOAD MODULE UPDATE 
/REPLACE LMUPOT « LOAD MODULE UPDATE . 
JEXEC OBJs(1,SYSTEMeLMUPDT) MEM8(388,5888,508) PRIY=(3,1)3 


/ 


TIMEse] MEM3=MEM PRTYssPRI TIMEssTIM 
» SYSTEM MESSAGE 


/ASSIGN 4 SC DEVICEssD0MSG 

/ASSIGN § SC DEVICE:sDCON FILEssFCON BUFFERS#1! CONTROL INPUT 
/ASSIGN 6 DISC1 DEVICESs0LM FILEssFL™ BUFFERS#1 LOAD MODULE INPUT 
/ASSIGN 7 DISC1 DEVICE: s0UPD FILE:sFUPD BUFFERSS! . UPDATE FILE 

ZENO 


eo# CREATE LINKUP,COMMENT,"LINK MOD AND UPDATE L M FILE® 
“REPLACE LINKUP e LINK MODULE AND UPDATE LOAD MODULE FILE . 
/EXEC OBJs(1,SYSTEM,/DXOLE) MEM#(30¢,12008,3000) PRIY#(1,1)3 


/ — TIMEwel MEMS SMEML 
/ASSIGN 1 DUMMY DEVICES2D0BJ FILE:sFOBJ BUFFERS#2 ", SECONDARY OBJ IN 
/ASSIGN 5 DISC1 DEVICE:sDIN FILErsFIN BUFFERS#1 ", PRIMARY INPUT/CON 
ZASSIGN 6 SC DEVICEssOLST FILEsaFLST BUFFERS=1 ~ LOADMAP I.IST/ERR 
ASSIGN 8 DISC1 FILEs(TEMP,LM) NEW BUFFERS#1 RELREC LRECL#643 

/ ACCESS®(ANY,ANYsANYANY) ALLOCATES(16,380,32,12) % LOAD MND OUTPUT 
/ASSIGN 9 DISC1 DEVICErsDPLX FILEs(SYSTEM,USRPLX) FILEtsFPLXs 

/ BUFFERS#2 + PLEXUS LIBRARY 
/ASSIGN 1@ DISC FILES(TEMP,SCRL) NEW DELETE BUFFERS#13 

/ LINKSEG ACCESSS(ANY/ANY,ANY,ANY)3 . LINKSEQ SCRATCH 

/ _ ALLOCATE# (18,308,256, 30) 

/ASSIGN 11 DISC! DEVICES #DEXT FILEs(SYSTEM,DXEXTD) FILES sFEXTs 

/ _ BUFFERS#4 . SYSTEM EXT DEFS 
ASSIGN 13 DISC1 FILE=(TEMP,SCRR) NEW DELETE BUFFERS#1 RELREC3 

/ ACCESS*(ANY/ANYSANYSANY) ALLOCATE®(10,306,128,108)3, 


LRECL2#10@ .« RELREC SCRATCH 


/ 
/EXEC OBJe(1,SYSTEM,LMUPDT) MEM®(308,5008,508) PRYYs(1,1)3 


/ TIMEse1 MEM: sMEMU 
/ASSIGN 4 SC DEVICE? s0MSG > SYSTEM MESSAGE 
/ASSIGN 5 8C DEVICEsDCON SHARE? sSCON . CONTROL INPUT 
/ASSIGN 6 DISC! FILESC(TEMP,LM) BUFFERS#1 - LOAD MODULE INPUT 
pacsicy 7 DISC1 DEVICE2sDUPD FILEssFUPD BUFFERS#! ~ UPDATE FILE 
ZEND 

8.11.2 MEMORY PARTITION REQUIREMENTS 


The memory requirements for the update utility are: 


MEM=(500, 12000, 4000). 


8.11.3 LUN ASSIGNMENTS 
LUN assignments for LMUPDT are given in table 8-25. 


a 
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Table 8-25, LMUPDT Logical Unit Assignments 


Error messages 


Control record input 


| Load module input file 


| | - Load module file to be updated | 


8.11.4 OPERATION 


One control record must be input for each load module to be updated. The 
control record contains only a base 10 value of the Memory Image Phase 
(MIP) to be updated, The value is obtained from the DX980 system link load 
map listing. To find this value, scan the load map listing for the IDT name 
of the module to be updated, The base 10 value of the MIP number for this 
overlay is entered, left justified, on the control record as the base ID. 

After the updates have been made, perform the Initial Program Loading (IPL) 
procedure to bring the modified load module dictionary into memory, This 


procedure is described in the DX980 System Operation Guide, Part Number 
943004-9701. 


~J 


8.11.5 SAMPLE INPUT 
A typical format for input on LUN 5 is as follows: 
Control Record for Overlay l 


Control Record for Overlay 2 


Control Record for Overlay n 


/* Terminates Control Record Input 


8.12 SOURCE MAINTENANCE ROUTINE (SMR) 


The DX980 Source Maintenance Routine (SMR) maintains source libraries for 
large software projects. The SMR keeps a history of changes made toa 
source library by recording the change level for each record within a pro- 
gram in the library, for each program in the library, and for the library it- 
self. The SMR can access any version (through all change levels) of any pro- 
gram in the library. It can be used for either batch or interactive applica- 
tions, and has commands that create a new program on the library, modify 
an existing program in the library, and that delete, list or extract programs 
in the library. The SMR can also produce an index of all the programs in the 
library. 
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8,12,1 STANDARD JCL PROCEDURE 


The following listing is a standard procedure for SMR: 


«# CREATE SMR »COMMENT, "SOURCE MAINTENANCE ROUTINE °® 
/REPLACE SMR e SOURCE MAINTENANCE ROUTINE . 


JEXEC OBJs(1,SYSTEM,SMR) 4EM8(309,11580,5080) PRTYS(1,15)3 


/ TIMEs@1 MEMS eMEM 
/ASSIGN 06 S8¢ DEVICE: sDMSG ", ERROR/USER 
/ASSIGN 4 SC -DEVICEs=DCON FILEs=FCON BUFFERS#1 ‘CONTROL 
ZASSIGN 6 DUMMY DEVICEssDLST FILEtsFLST BUFFERS®1 * LISTING 
/ASSIGN 245 MT¢  DEVICErsDOLD FILEssFOLD BUFFERS®1 LINKSEQ . OLD LIBRARY FILE 
/ASSIGN 222 DUMMY DEVICEss0COM FILEssFCOM REPLACE #RCOMS 
/ BUFFERS®! LINKSEQ ACCESS#CANYSANYsANYSANY)S 

ALLOCATES =LCOM ". COMP 0 
ASSIGN 225 DUMMY DEVICEssONEW FILEtsFNEW REPLACE3SRNEWS SEER err ae 
/ BUFFERS#!1 LINKSEQ ACCESSsC(ANY,ANY,ANYSANY)3 
/ ALLOCATE 3 ®LNEW " NEW LIBRARY FILE 
ASSIGN 226 DUMMY > JCL UPDAT CON OUT 
7ZASSIGN 235 DUMMY DEVICESsDEV35 FILE:"FIL35 BUFFERS#2 . INCLUDE 1.UN OPT 4 
pie 245 DUMMY DEVICE: sDEV45 FILE:®FIL45 BUFFERS#2 " INCLUDE LUN OPT 2 
7END 

8.12.2 MEMORY PARTITION REQUIREMENTS 


SMR memory requirements are defaulted in the standard procedure to the 


following: 


MEM=(300, 11500, 2000) 


8.12.3 LUN ASSIGNMENTS 


The logical unit numbers that must be assigned for SMR are provided in 
table 8-26. In addition to these standard required LUNs, any other LUNs 
can be assigned to SMR and accessed by the include option. 


NOTE 


All LUN assignments for SMR, unlike most utilities, 
are hexadecimal numbers, 


8.12.4 OPERATION 


SMR executes in either an interactive or a batch manner depending on the type 
of device used for command input. No special command is required since 
SMR determines the manner of processing from the attributes of the command 
LUN. Error processing is the main difference between the two operational 
types. When executing interactively almost no errors are fatal. The error 
message is output to the interactive device (in addition to the listing device), 
the user can re-enter the command. When batch processing, however, 
Logical errors allow recovery. 


and 
some errors are fatal and some are logical. 
See section 8.12.5 for a description of SMR error codes. 
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SMR Logical Unit Assignments 


Comments 


Table 8-26. 


Description 


Operator Console 
Messages 


Used only as explained in discussion of 
"| #PAUSE" command, 


2516 


Command Input 
(Logical/ fatal 
error messages 
if interactive de- 
vice) 


Listing 


Oid Library File 


Compile Output 
File 


New Library File 


If assigned to an input/output device cap- 
able of printing, SMR executes in an inter- 

ctive manner; if assigned to an input- 
only device/file, SMR executes in a batch 
manner, If assigned to DUMMY, the SMR 
assumes that the first command is 
".#UPDATE *COPYLIB". (See discus- 
sion of UPDATE mode command,) 


Any sequential device/file, SMR uses 

this LUN to list all submitted commands, | 
for messages, and for listings of programs 
and indexes of the library as described in | 
discussion of '', #LIST", ", #LSTALL", 

and ', #INDEX"' commands, If LUN 4 is 
assigned to an interactive device and LUN | 
6 is assigned to DUMMY, then all messages 
and the output caused by '', #LIST", 

' #LSTALL, and ',#INDEX" commands 
are written to LUN 4. Therefore, LUN 6 
may be assigned to DUMMY unless a hard 
copy of the processing performed is de- 
sired. 

Any rewindabie sequential device/file, 

Must be assigned to DUMMY if OLDLIB 

is not being used. 


Any sequential device/file. This file is 
the output LUN for all '', #COMPILE'" 
commands and for ', #MODIFY'' com- 
mands if in EXTRACT mode (as discussed 
later). 


_Any rewindable sequential device/file. If 


running SMR in EXTRACT mode (as dis- 
cussed later), this LUN is not used and 
may be assigned to DUMMY. Otherwise 
this file is theoutput LUN when any change 
are made to a program on OLDLIB; ali un- 
modified programs are copied unchanged, 
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Table 8-26. SMR Logical Unit Assignments (Continued) 


2614 | Scratch File Used in JCL installation procedure only. 
LUN 26 must be assigned to DUMMY for 
general use of SMR. 


All modules that comprise a project reside in a source library (OLDLIB). 
OLDLIB is a sequential data set with rewind capability, either a linked se- 
quential file or a magnetic tape. The directory entry for each program in 
the library contains such information as module name, revision level, a 
descriptive title, a general comment field for any other information the user 
may desire to include, and the language in which the module is written (e.g. 
PLEXUS, SAP, FORTRAN, etc). All SMR commands that reference existing 
library programs read from OLDLIB, the input source library. Whenever 
a library program is to be modified or a library program added, a new 
source library data set (NEWLIB) is created. OLDLIB is not modified. 
NEWLIB is a copy of OLDLIB except for the modifications made via SMR 
commands. NEWLIB has a revision level one greater than OLDLIB and all 
programs modified have as a latest change level the revision level of NEWLIB. 


Source programs can also be copied from OLDLIB to a compile file; that is, 
a sequential file suitable for input to a compiler or assembler, The compile 
file is useful when a copy of a program is desired but no permanent changes 
are being made. 


Functionally, SMR can be operated in three modes: Extract, Update and 
Verify, The mode to be used is determined when the first command is read 
and cannot be changed after that point. The following paragraphs describe 
each of the modes, 


8,12.4.1 UPDATE MODE, In Update mode, SMR assumes that no output is 
to be made to the compile file. SMR reads from OLDLIB and writes to 
NEWLIB. If OLDLIB does not exist (a new library is being built), then the 
logical unit for OLDLIB (LUN 151¢) must be assigned to DUMMY. Whenin 
Update mode, SMR requires that the programs in the library be in alphabeti- 
cal order. Whenever it adds a new program to a library, it first copies any 
existing programs from OLDLIB that alphabetically precede the new program 
(sorted by the name assigned to the program when it was created in the li- 
brary). Furthermore, all SMR commands that reference programs in 
OLDLIB must reference those programs in alphabetical order, Any pro- 
grams in OLDLIB that are not specifically referenced in the command are 
copied to NEWLIB unaltered, Ifa program is referenced out of order, SMR 
will search to the end of OLDLIB without finding the program and will not 
rewind OLDLIB to find the program (rewinding OLDLIB would create multi- 
ple copies of programs from OLDLIB in NEWLIB). 
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8.12.4.2 VERIFY MODE, When operating in Verify mode, SMR assumes 
that no output is to be made to the compile file. NEWLIB may not be as- 
signed to DUMMY. This mode verifies that a new library (NEWLIB) was 
generated without I/O errors. SMR commands operate the same in this 
mode as in Update mode, except that SMR does not write to the output li- 
brary, NEWLIB. Instead, SMR reads NEWLIB and compares it to verify the 
contents of the record, 


8.,12.4.3 EXTRACT MODE, In Extract mode, SMR assumes that no new 
library is being created. All commands, except .# CREATE and 

.# DELETE, have meaning as discussed later in this description. Refer- 
ences to programs in OLDLIB do not need to be in alphabetical order since 
SMR rewinds OLDLIB to search for the programs when in Extract mode. 
However, SMR is more efficient if references are alphabetically ordered, 


8,12.4.4 SPECIFYING UPDATE MODE, To use the Update mode, the 
first command to SMR must be one of the three following commands: 


-#UPDATE 
.# UPDATE *COPYLIB 
.# UPDATE *DH*'<rl>', 


The first command (,# UPDATE) activates the Update mode as previously 
described with no modifications. 

The second command (,# UPDATE *COPYLIB) instructs SMR to copy 
OLDLIB without changes to NEWLIB. Specifying this option prevents SMR 
from incrementing the library revision level, and produces an exact dupli- 
cate of OLDLIB in NEWLIB. This option replaces the DXCOPY utility for 
copying SMR libraries since DXCOPY cannot handle the large size logical 
records (up to 3600 characters) that SMR writes. If the command input de- 
vice (LUN 4) is assigned to DUMMY, then SMR assumes that the first input 
command is .#UPDATE *COPYLIB. If the *COPYLIB option is specified, 
SMR does not request further input. 


The third command (,#UPDATE *DH*'<rl>',) instructs SMR to Destroy 
History. The symbol<rl>represents a 2-character code supplied by the 
user for a revision level indication, The command must appear exactly as 
it is shown to correctly specify the Destroy History option, When SMR re- 
ceives this command, it does not write any record onto NEWLIB that was 
deleted previous to the specified revision level (<rl>). Refer to the discus- 
sion of , #MODIFY and .#DELETE commands for an explanation of the de- 
leted records, 
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8,12.4.5 SPECIFYING VERIFY MODE, To use the Verify mode, the first 
command to SMR must be one of the three following commands: 


.# VERIFY 
.4 VERIFY *COPYLIB 
_#VERIFY *DH*'<rls'. 


The options in the above commands are the same as those previously de- 
scribed for the ,#UPDATE command. To run SMR in the Verify mode, use 
one of the ,# VERIFY commands as the first command, Any options used in 
this command must be the same options as specified in the ,#UPDATE com- 
mand used to create the NEWLIB that the command is verifying. Following 
the initial command should be the same sequence of commands that followed 
the ,#UPDATE command (excluding the .# UPDATE command), Similarly, 
the LUN assignments for OLDLIB and NEWLIB should be exactly the same 
as those used to create the NEWLIB. 


8.12.4.6 SPECIFYING EXTRACT MODE, To specify Extract mode, the 
first command may be any valid .#xxxx command except those commands 
used to specify the Update and Verify modes, The following two commands 
specifically designate the Extract mode: 


~# EXTRACT 
.# EXTRACT *SEQ 


The term, *SEQ, specifies a sequencing option used with the , #LIST, 
.#LSTALL, and .# MODIFY commands, Refer to the discussion of the 
.# LIST command for a description of this option. 


8,12.4.7 CREATING A NEW MODULE ON NEWLIB, The command to 
create a new module on the new library tape is: 


. #CREATEx<name>, <language>, <title>, <comment>. 
The user specified fields are defined as follows: 


@ <name> - name to be assigned to the module. This is the name used 
to reference the module in any other command. Limited to 9 char- 
acters, 


e <language>- source language of the module. 
Languages recognized include: 


a) SAL - 960 Assembly Language Source | 
b) SAP - 980 Assembly Language Source 
c) OBJECT - Object Decks 

d) FORTRAN 
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e) FORT - Alternate Identifier for FORTRAN 

f) COBOL 

g) XPL 

h) PLEXUS - Specifies PLEXUS language 

i) PL1- Specifies PL/I language 

j) ASM - S/360 Assembly Language Source 

k) ALGOL | 

1) COMMENT - module containing USASCII source records for 
comment only. 


e <title> - a quoted string, limited to 36 characters, that provides a 
more descriptive title than the 9-character name. 


@ <comment> - a quoted string, limited to 20 characters, that can 
hold any additional information such as programmer, author, pro- 
ject name, etc. 


When the CREATE command is invoked, all programs in OLDLIB (if any) 
that alphabetically precede the current program are first copied to NEWLIB. 
If a program with the specified name already exists in OLDLIB an error is 
declared. The commands that follow this command normally define the de- 
sired contents of the new module. Two different commands can follow a 

.# CREATE, They are: 


1) ./INCLUDE <lun>,<lun>,... 


Includes 80 character records (64 if the specified language name is 
OBJECT) from the specified <lun> until an end-of-file is read, 

The <lun>is not rewound before input. A .#REWIND command 
should be used to rewind the<lun>if desired. More than one 

. /INCLUDE command may be used. The <lun> may be a decimal 
number, or a hexadecimal number prefixed by a ">" (greater than) 
or a '#"' (pound sign). Any number of<luns> may be specified. If 
the language name is OBJECT, the contents of the module must be 
inserted using ./INCLUDE commands since no object records may 
be encountered in the command input stream. 


2) <Any record from the command input stream that does not have a 
',#' or ',/' in column 1 and 2 is interpreted as part of the module 
definition. The definition is completed with either another . # com- 
mand or an end of file in the command input. 


8.12.4.8 MODIFYING A PROGRAM ON OLDLIB, The command to begin 
modification of a program on OLDLIB is: 
-#MODIFY # £<name>. 


or 


-#MODIFY <name>,<language>,<title>, <comment>. 
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The <name> field represents the name of the program to be modified. If the 
program is not defined on OLDLIB, an error condition exists and the com- 
mand is terminated, The<language>,<title>, and <comment> fields are op- 
tional, They need only be supplied to change those fields on the program 
header record that SMR maintains for the program and that are displayed 
for each program when a ,. #INDEX command is processed, If any one of 
these three fields is specified, then the field (or fields) preceding it must 
also be specified. For example, to change the title, the .#MODIFY com- 
mand must specify the name, the language and then the title. 


If in Update mode, then the resulting program image is written on NEWLIB. 
If in Extract mode, the resulting program image is written to the compile 
file. When the .# MODIFY command is invoked in Update mode, all pro- 
grams in OLDLIB that alphabetically precede the specified program are first 
copied to NEWLIB. More commands are then input to define the new pro- 

A gram contents. Four different commands can follow a .#MODIFY com- 
are: 


1) @NNNNN. 


This command is the Insert After command, This command copies 
from OLDLIB all records in the program up’to and including record 
number NNNNN,. The number, NNNNN, should be a decimal num- 
ber (leading zeroes not required). (The .# LIST command descrip- 
tion discusses sequenced listings of a program in OLDLIB. The 
sequence numbers given by such a listing are the appropriate num- 
bers to use for NNNNN.) When the records have been copied (to 
NEWLIB if in Update mode or to the Compile File if in Extract mode) 
then a new command is read to continue defining the new program 
contents, 


2) @NNNNN, MMMMM. . 


This command is the Delete Records command. This command per- 
forms the following functions: 


e Copies all records of the program from OLDLIB up to and in- 
cluding record number NNNNN-1I1, 

e If in Extract mode, it reads and discards all records up to and 
including record number MMMMM from OLDLIB. 

e If in Update mode, it reads and marks as deleted (at the revision 
level of NEWLIB) all records up to and including record number 
MMMMM and then writes the records to NEWLIB. SMR does 
not delete these records; it only marks them 'deleted'. In this 
way SMR can reproduce the image of a program in the library 
exactly as it appeared at any previous revision, 
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3) ./INCLUDE <luns,<lun>,... 


This command operates the same as explained in the discussion of 
the . #CREATE command. 


4) Module Definition, 


Any record from the command input stream that does not have an 
"@' in column 1, ora",#" or ",/" in columns 1 and 2 is inter- 
preted as part of the module definition, It is inserted into the com- 
pile file or NEWLIB immediately, The module definition is com- 
pleted when either a ',#'' command or an End-of-file is encountered 
in the command input stream, 


If an '@NNNNN," command is encountered after record NNNNN+1 has been 
read from OLDLIB, then an error message is output and the command is ig- 
nored, Similiarly, if a "@NNNNN, MMMMM," command is encountered after 
record NNNNN has been read from OLDLIB, then an error message is given 
and the command is ignored, 


If in Extract mode and the '*SEQ" option was specified in the ",# EXTRACT" 
command, then columns 73 through 80 of the record are modified before being 
placed in the Compile File, The modification is as follows: 


1) Ifthe record was not previously in OLDLIB (inserted into the com- 
mand stream or via a ''. /INCLUDE" command), then columns 73 
through 80 are blanked, 


2) If the record was in OLDLIB previously, then columns 73 and 76 
are blanked, columns 74 and 75 contain the 2-character revision 
level that represents the revision level of the library when the rec- 
ord was added, and columns 76 through 80 contain a 4-digit (decimal) 
sequence number, 


8,12.4.9 COMPILE, The format of this command is: 


<name> 
. # COMPILE * : 
/* 


This command moves records to the compile file when no editing is required. 
Only one of the three options may be specified, If not in Extract mode, then 
use of the ''/*'' option causes the command to be ignored and use of either 
<name>or * options produces a logical error message output and the com- 
mand is then ignored. . 


The user supplied parameters are interpreted as follows: 


e <name> - Name of a module to be copied from OLDLIB to the com- 
pile file. 
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e * - Records are to be copied directly from the command input into 
the compile file until a '', #'' command or an end of file is encountered, 


e /* - Write an end of file in the compile file, An end of file is auto- 
matically written on the compile file when SMR terminates, This 
command permits the user to build compile files with more than 
one end of file, 


To obtain a copy of a module in OLDLIB as it was at a revision previous to 
the current revision of the module, a second option may be added to the 
<name> option as follows: 


.# COMPILE < names, *'<rl>'. 


The notation<name>is the name of the module and<rl>represents a 2- 
character revision code for the desired revision level, The allowed revision 
character codes with interpretation are: 


3k ok - 0 
KA ae | 

* Z, = 26 
AA =27 
AZ = 52 
ZZ = 702 


The * and quote marks are required to correctly specify the revision level 
option, 


8,.12.4.10 DELETE, The command for designating modules as deleted 
from the library is: 


. #DELETE < name>,<name>,... 


If in Extract mode, this command is ignored, Otherwise, each module 
named is located in OLDLIB and then the header record is marked "deleted", 
After marking the header record, SMR marks all previously non-deleted rec- 
ords as being ''deleted" at the revision level of NEWLIB. All records (in- 
cluding the header record) are copied to NEWLIB. This "deletion" prevents 
the module name from appearing when an Index (as discussed later) is done, 
All subsequent references to the module name result in an error unless the 
command that references the module name also contains the necessary op- 
tions to specify that the revision level desired is previous to the "deletion" 
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of this module. However, if a .4# CREATE command is later used and the 
name given matches the name of a previously deleted module, then the header 
record and module name are reactivated, all the previously deleted records 
are copied, unaltered, to NEWLIB, and then the next command is read to 
start defining the module's contents. The source language of the new module 
must be OBJECT if and only if the source language of the old module was 
OBJECT, 


.#LIST < name>,<name>,... 


This command lists the source records in the modules specified. The mod- 
ules referenced must always be on OLDLIB. If in Extract mode and the 
'&*SEQ' option was given on the ''. #EXTRACT" command, then columns 73 
and 76 are blanked, columns 74 and 75 have the 2-character code for the 
revision level of the module when the record was created, and columns 77 
through 80 contain a 4-digit (decimal) sequence number. 


To get listings of certain modules as they appeared at a revision previous to 
their latest revision, the revision level may be specified as in the following 
example: 


~#LIST NAMEI, *'*A', NAMEZ2, NAME3, *'BZ', NAMEA, *!2%!', 
This example generates a listing of: 


1 Module NAME 1 as it appeared at revision *A 


iw) 


Module NAME3 at revision BZ 


Ww 


) 
) Module NAMEZ2 as it appears at the current revision 
) 
) 


4) Module NAME4 at revision ** (when the library was first created. 


8.12.4.12 LIST ALL, The command for listing all modules in OLDLIB 
(except those with source language OBJECT) is: 


pHLSTAL: 


This command is invalid unless in Extract mode, Every non-OBJECT mod- 
ule in OLDLIB will be listed on LUN 6. However, if LUN 4 is assigned to an 
interactive device and LUN 6 is assigned to DUMMY, the listing appears on 
LUN 4. The *SEQ option on the .4# EXTRACT command has the same effect 
when the .# LSTALL command is used as for the . #LIST command, 


8,12.4,.13 REWIND LUN, The command to rewind one or more logical 
units is: 


. #REWIND <lun>,<lun>s, ---. 
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The notation may be a decimal number, or a hexadecimal number prefixed by 
a'>' ora '#', This command can be used to rewind a< lun>referenced ina 
. /INCLUDE command, 


8.12.4.14 INDEX. The command for listing a library index is: 
. #INDEX 


The .# INDEX command lists on LUN 6 a catalog of all the modules on the 
library tape. However, if LUN 4 is assigned to an interactive device and 
LUN 6 is assigned to DUMMY, the listing appears on LUN 4, If the 

. #INDEX command is input after records are written to NEWLIB, then 

the new library will be indexed when the ,. #ENDALL command is entered to 
terminate SMR. Two possible options may be specified with the . #INDEX 
command (but only one ata time). The first: 


. FINDEX *'<rl>'! 


causes SMR to produce an index of the library as it appeared at the revision 
specified by the 2-character revision code represented in the example by <rl>. 


The second: 
.#INDEX *TH (Note the lack of quotes) 


causes SMR to produce a listing of the library header records for all pre- 
vious revisions of the library (beginning with the most recent and going back- 
wards). This option is useful if the library header information has been 
changed in previous revisions via the .#TAPE command, 


8.12.4.15 TAPE, The command for creating a library header record is: 
. #TAPE ‘'<title>', '<part number>', '<date>', *'<revision level>'. 


The user specified fields are defined as follows: 


e <title>- a quoted string, limited to 26 characters, that is the name 
of the source library. 


@ <part number>- a quoted string, limited to 12 characters, to be 
used to document the part number the source library was released 
under. 


° <date >- a quoted string, limited to eight characters, used to docu- 
ment the date the source library was generated, 


e <revision level>- a quoted 2-character string indicating the revision 
level of NEWLIB.. If not specified, NEWLIB will have a revision 
| level which will be the next sequential alphabet character; i.e. *B if 
OLDLIB was *A. 


The .#TAPE command is optional and need only be specified the first time 
that a new library is generated or to change the title, part number, or date on 
the library header record for the next revision of the library, This command, 
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if used, may be preceded only by .#PAUSE, .# INDEX, .#UPDATE, and . 
.# VERIFY commands, 


8,12.4.16 PAUSE, The command to write a message to the operator's 
console is: 

. # PAUSE'<message>', 
This command writes the quoted string on LUN 0. Processing is continued 
when a response (carriage return or end of file) is entered on LUN 0. 
8,.12.4.17 ENDALL, The command for terminating SMR is: 

. #ENDALL 


An end of file on LUN 4 also terminates SMR. If a -#INDEX of NEWLIB has 
been specified, it is processed when the copy from OLDLIB to NEWLIB is 
completed. 


8.12.5 ERROR CODES - 
Error codes for SMR are output to the listing device (LUN 6) and in the inter- 
active mode, to the interactive command device (LUN 4) as well. In the in- 


teractive mode, only two errors are considered fatal, Unlimited user retry 
is normally allowed. In the batch mode, errors are classified as fatal, (i.e. 


« e e e ° 
abortive to the job) or logical (i.e. program recoverable), Logical errors 


for batch mode include invalid LUN, missing arguments, unmatched quota- 
tion mark, etc. In these cases the field is either skipped, assumed to be a 
blank, or assumed to be terminated by quotation mark in column 81, 


The two fatal errors for both SMR batch and interactive modes are: 


6 Specifying Update or Verify mode with NEWLIB assigned to 
DUMMY. 


6 Specifying (or defaulting to) Extract mode with OLDLIB assigned to 
DUMMY. 


The two fatal errors for SMR batch mode are: 
@ Referencing a file name that does not exist in the old source library 


e Exceeding 100 logical errors, 


8.12.6 SAMPLE OUTPUT 


The following paragraphs contain examples of the use of SMR. 
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8.12.6.1 CREATING A NEW LIBRARY TAPE IN BATCH MODE, The JOB 
and RUN commands for this execution are: 


/JOB S SYSTEM 
/RUN SMR DOLD=DUMMY DNEW=MT1 DCON=CRI; 


/DMSG=SC DLST=LP1 DCOM=DUMMY. 


The control cards and statements defining the modules are shown in figure 


8- ros 


Figure 8-14 shows the index of NEWLIB at the termination of SMR. 


SOURCE MAINTENANCE ROUTINE 


o#UPDATE 
oMTAPE ‘SMR EXAMPLES', '12345657800!,'04/10/75!,atwa! 
eMCREATE EFF 330,FORTRAN, COMPUTE D&33@ DISC EFFICIENCY!, 
WRITE (6,308) 
3@B8 FORMAT (AH1,3X,13HRECORDS/TRACK » 4X, L4HSECTORS/RECORD, 
1 2X, 12HWORDS/RECORD,2X,{BHUSEFUL WORDS/TRACK, 
2 2X,1GHEFFICIENCY) 
DO 190 ISECR » 1,88 
WC @ (CISECR#1221.,056677,8)#32,59/(34,0016,0) 
I®ROR ® WC/32 
IWRDR & TWRDR#32 
IRECT # 88/ISECR 
TUSWT & IRECT#eIHWROF 
EFFe (IUSWT#104.4)/6720,¢ 
108) §=& PRITE (6, 20P) IRECT, ISECR, IKRDR, LUSWT,EFP 
208 aoe 1/09XelT5 eI BXeTS, 10%, 15,1 3X 515, 9XeF B52) 


END 
o#CREATE SMREXAMPLE, COMMENT, 'SMR 
THIS 18 ORIGINAL RECORD 
THIS 18 ORIGINAL RECORD 
THIS 18 ORIGINAL RECORD 
THIS 18 ORIGINAL RECORD 
THIS 18 ORIGINAL RECORD 
THIS 18 ORIGINAL RECORD 
THIS 18 ORIGINAL RECORD 
THIS 18 ORIGINAL RECORD 
THIS 18 ORIGINAL RECORD 
THIS 1S ORIGINAL RECORD 


XAMPLE # 2 ','NO COMMENT! 


SBeeetzez eB 222™ 
=O ONO & Ue 


e# INDEX, 
PLAG SET TO INDEX NEw LIBRARY 
e#ENDALL, 


Figure 8-13. SMR Batch Input to Create a New Library 


PARY NO,812345607890 REVeee DATES%4/19/75 TITLESSMR EXAMPLES 


NAME REV LANG TITLE COMMENT 


EFF33ua #@ FORTRAN COMPUTE D&33@ DISc EFFICIENCY 
SMREXAMPL # COMMENT SMR EXAMPIE # 2 NO COMMENT 
2 FILES ON NEw LIBRARY 


Figure 8-14, Index of NEWLIB 
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8,12.6.2 GETTING A SEQUENCED LISTING OF A MODULE, Figure 8-15 
shows the commands entered to get a sequenced listing of a module in 
OLDLIB and the resulting list. The JCL to run SMR for this example is: 


/JOB S SYSTEM 
/RUN SMR DNEW=DUMMY £DOLD=MT1 
/DCON=SC DLST=LP1 DCOM=DUMMY 


PART NO,812345687890 REVeew DATE#94/1G/75 TITLESSMR EXAMPLES 


s#EXTRACT #SEG 
e#LIST SMREXAMPLE . 


NAME REV LANG TITLE COMMENT 

SMREXAMPL #* CUMMENT SMR EXAFPLE # 2 NO COMMENT 
THIS 18 ORIGINAL RECCRD # { ee gr2! 
THIS 18 ORIGINAL RECORD # 2 ee 2002 
THIS 18 ORIGINAL RECCRD # 3 se g9a3 
THIS 18 ORIGINAL RECORE # 4 ee 9904 
THIS 18 ORIGINAL RECORD # 5 ee 9205 
THIS 18 ORIGINAL RECCRD # 6 oe 9206 
THIS 18 ORIGINAL RECORD # 7 oe 2087 
THIS 18 ORIGINAL RECORD @ 8 ee 9008 
THIS 18 ORIGINAL RECORD # 9 ee 9709 
THIS 18 ORIGINAL RECORD # 18 ee geia 


o#ENDALL 


Figure 8-15, Sequenced Listing Commands and Listing 


8,12.6.3 ADDING A MODULE TO GET A NEW LIBRARY. Figure 8-16 
shows the command input stream used to add two modules to the library. 
Figure 8-17 shows an index of the new library, Note that the modules have 
been inserted in alphabetical order. 


8,12.6.4 MODIFYING A MODULE, Figure 8-18 shows the command input 
stream to modify a module in the library. Figure 8-19 shows an Index of 
the new library generated, 


8,12.6.5 THE SEQUENCED LISTING OF THE MODIFIED MODULE,  Fig- 
ure 8-20 shows the command input stream used to get a sequenced listing of 
the module modified in example 8, 12.6.4, as well as the sequenced listing 
of that module. 


SS ——— 
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PART NO.812345607899 REVees DATES%4/18/75 TITLESSMR EXAMPLES 


e*UPDATE , . 
eHCREATE EDITOR, PLEXUS, CHARACTER EDITOR PROGRAM!, 
/* $C $8 SH $A «/ 


DECLARE EDITOR FROCEOURE CHARACTER, 
CINSTRN,OTSTRN,NWSTRA) CHARACTER(86)) 
INSTRN @ t ty 
DO WHILE SUBSTRCINSTRN,1,27) aw "S89 
INSTRN @ INPUT} | 
NWSTRN @ EDITORCINSTRN,'JLO!,'ILx' 2 
QUTPLIT s NWSTRNJ 
END} 
EDITOR: PROCEDURE CINSTRING,VICTI“,VICTOR)) 
DECLARE CINSTRING,RESULT) CHARACTER(88), 
CVICTIMs,VICTCR) CHARACTER, 
I FIXEDC16)3 
RESULT s INSTRING} 
I 8 6) 
DO WHILE IT<s(LENGTHCINSTRING) e» LENGTH(VICTOR)) & 
I<eCLENGTHCINSTRING) © LENGTHCVICTIM)) & 
(I < 188)3 
IF VICTIM #@ SUBSTRC(TNSTRING,IT,I*LENGTHC(VICTIM)) THEN 
RESULT s SUBSTRCINSTRING O@,IIIIVICTORI I 
SUBSTPCINSTRING, T4LENGTHCVICTIM) )3 
Is I + i} 
ENDS 
RETURN RESULTS 
END EDITOR} 
EOF 
e#CREATE SEEK,SAP,!0833@ INDEPENDENT SEEK TEST', 
IOT ISTEST 
HED DS33A INDEPENTENT SEEK TEST 
svc OPD 2C€368,3 
START EQuU §& 
cKi Eau §$ 
TMBZ BUSY,PRBi 
BRU CK?2 
BRU RBUFI 
CKe EQU § 
YMBZ BUSY,PRB2 
BRU CKi 
BRU RBUF2 
RBUF{ SMBZ WRITE,PREI+! 
DLD PRBI44 
DAD INC 
DST PRB1I+4 
@LOM sPRBI 
BRU GO 
ROBUF2 SMBZ WRITE,PRH2e1 
DLD PRB204 
DAD INC 
DST PRB2+4 
@LDOM sPRB2 
60 -8VC 8 
BRU CK 
PRBi DATA 5,28017,52,BUF1,0,8 
WRITE E@U 45 
BUSY E@u 9g 
INC DATA 9,88 
PRBQ DATA 6,78017,32,BUF2,8,88 
BUF, BSS 32 
BUP2 BSs 32 
END START 
eMINDEX 
FLAG SET TO JNDEX NEW LIGRARY 
ePENDALL 
Figure 8-16. Input Stream to Add Two Modules 
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PART NO, 512345607899 REVeed MATE SAAsIA/IN TIYLESSHR FYAMPLES 


NAME RFY LANE YTITLF PAMMENT 
EenilTaRr wh PLEXES CHARACTER FRITOR PROGRAM 

FFE 34” ae FOSTRAM COMPHITE NS33A Hse FRFICTENCY 

SFEK @A SAP DS334 TMNFPENUERT SFE TEST 

SMREXAMP[ we POMMENT SMR EFEX AMPIF & 2 NO CAMMENT 


4 FTLES OW NEw LTP ARY 


Figure 8-17, Index of NEWLIB with Added Modules 


PART NO.812345657690 REY@eA DATE®94/10/78 TITLESSMR EXAMPLES 


eMUPDATE 
e#MODIFY SMREXAMPLE 
_ THIS 18 NEW RECORD # 1 


05 
THIS 18 NEW RECORD # SeA 
THIS 1S NEW RECORD # SB 
07,9 
THIS 18 NEW RECORD 7eA 
OD 7FFF 
THIS 3S THE NEW LAST RECORD 
e#INDEX 


FLAG SET TO INDEX NEw LIBRARY 
eWENDALL 


Figure 8-18, Input Stream to Modify a Module 


PART HN S1D3d5Se7ROO REV EHR PATE RAA/SIO/7TN TITLE SShR FRAMPLES 


NAME REV LANG YITLe - FAMMENT 
ENLTi)# wA PLEXUS CHARATTFR EATING PROGPAY 

FEF U3" we FOOTTAs COMPUTE OS3RA NSer FFFICTENTY 

SFrK wA Sap NS38A TNF PENDENT SEEK TEST 

SMREXAMPL #8 TOMMENT SMR EYAMPIF & 2 NO COMMENT 


4 PILES ON AEW LTPRARY | 


Figure 8-19, Index of Modified Module 


8.12.6.6 DELETING A MODULE, Figure 8-21 shows the command input 
stream to delete a module. Figure 8-22 shows an index of the new library 
generated, This index was generated in a separate run of SMR. 
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PART NO0.81234860e7600 REVeeK DATE®™4/18/75 TITLESSMR EXAMPLES 


e#EXTRACT #SEQ 
eWLIST SMREXAMPLE 


NAME REV LANG TITLE COMMENT 
SMREXAMPL #B COMMENT SFR EXAFPLE # 2 nO COMMENT 
THIS 318 NEw RECORO @ 4 *B anei 
THIS 18 ORIGINAL RECORD w& { *@ 8002 
THIS 18 ORIGINAL RECORE # 2 *@ 9283 
THIS 18 ORIGINAL RECORD # 3 ee B04 
THIS 18 CRIGINAL RECORD @ 4 #@ 9985 
THIS 18 ORIGINAL RECORD # 5 ve 9066 
THIS 18 NEW RECORD # SHA e8 9997 
THIS 18 NEW RECORD # SeB *8 2008 
THIS 18 ORIGINAL RECORD # 6 ee 2709 
THIS 31S NEW RECORD 7JeoaA *8 gale 
THIS 18 ORIGINAL RECCRE @ 19 ee gall 
; THIS 18 THE NEW LAST RECORD *B 2712 
eMENDALL 
Figure 8-20. Sequenced Listing of Modified Module - 
Input Commands and Listing 
PARY NO.812345607890 REVsel) PATE®%4/19/75 TITLESSMR EXAMPLES 
o#UPOATE 
e#DELETE EDITOR 
eERDALL 
Figure 8-21, Input Stream to Delete a Module 
PakT 'N, 812545507392 REVeerl PATE RBA 4/19/75 TITLE SSMR FYAMPLES 
NAME REV LAKG TITLE CAMMPNT 
EFF AS we FORTRA® COMPLITE NS330 NTS FREIFTENCY 
SFEK es Sap OS3NA TANFPENNENT SFEK TEST 
SMRFXamMPL eR COYMFNT S“R EXAMPLE w 9 NO COMMENT 


3 FILFS OM REA TTPRARY 


Figure 8-22, Index of NEWLIB without Deleted Module 
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8,13 LINKABLE PARTS FILE BUILD UTILITY (LPFBLD) 


The LPFBLD utility maintains a key indexed file of 980 object records, Each 
object deck in the file has a key equal to the IDT name with all of the object 
records for that program sequentially linked to the key. LPFBLD can be used 
to modify, extract, or delete members of a linkable parts file. LPFBLD cre- 
ates a key of the program if added to the file and replaces the old object if the 
IDT name already exists as a key. 


LPFBLD is useful for building an object file for input to the DX980 link editor 
(DXOLE). To retrieve an object deck from the key indexed file, use the 
DXOLE include with key option (i.e, INCLUDE 20(IDTNAM)). Using DXOLE 
and LPFBLD together in this manner allows easy manipulation of object files 
and easy retrieval for link editor input. 


8.13.1 STANDARD JCL PROCEDURE 


The following listings are standard procedures for LPFBLD. The firstis for 
a single step job executing LPF BLD. The second is for a two step job per- 
forming an assembly of the module and including this assembled module in 
the library file, 


e# CREATE LPFBLL,COMMENT, "UPNATE LTNKARLE PARTS FILE " 


/REPLACE LPFALN - UPDATE LINKARLFE PARTS FILE , 

JEXEC OBJe(1,SYSTEM,LPFBLD) MEMS (390,3300,170F) PRTY#(1,2)3 

/ TIMEmset NBJ2:anR] PEM? sMEM 

/ASSIGN @ DUMPY DEVICES eNCOn e CONTROL 

/ASSIGN 5 NISCL NEVICERSOGRJ FILE S(USER@1,ASMOlUT) FILEtaFOBJS 

/ BUFFERS#®1 . OBJECT INPUT 

/ASSIGN 6 SC NEVICESslLST » LISTING 

7ASSIGN 7 DUMMY DEVICESSDEXT FILESsFEXT REPLACES SREXT? 

/ BUFFERS#s1 LINKSFO ACCESS#(ANY,CREAT,CREAT,CREAT)} 

/ ACCESS3aCExT ALLOCATE#(1,%,128,20) ALLOCATES SLEXT , EXTRACT PILE 

/ASSTGN 9 NISC DOEVICERsNPh FILEssFurND REPLACES sRUPN} 

/ BUPFERS#2 INDEXED ACCESS#(CREAT,CREAT,CREAT,CREAT)} 

/ ACCESS? eCUPD ALLUCATE#(1,%,256,10) ALLOCATES sLuPO?s 

/ KEYLENS6 . UPNATF FIIE 

/END 

2* CREATE ASMUP ,COMMENT,"ASSEMBLE MOD AND UPDATE LPF, ° 

/ REPLACE ASMUP e ASSEMBLE MODULE AND UPDATE LPF ; 

/EXEC OBJ8(1,SYSTEM,ASMBLR) MEM8(398,6808.,20889) PRYYs(1, 233 

/ TIMEse1 MEMS=MEMA Ss nat 

(ASSIGN @® DUMMY DEVICE? sDMSG p SYSTEM MESSAGE 

ASSIGN 4 DUMMY DEVICEsrs0CON , CONTROL /MESSAGE 

ASSIGN § DISC1 DEVICE:sDSRC FILEssFSRC BUFFERS#1 py SOURCE INPUT. 

ASSIGN 6 SC DEVICEs=DLSTA FILEseFLSY BUFFERS®1 . SOURCE LIST/ERROR 

ZASSIGN 7 DISC1 FILEs(TEMP,OBJECT) NEW BUFFERS#!1 LINKSEQ? , ; 

( ACCESS#(ANY,ANY,ANYSANY) ALLOCATE®(10,308,64.20) . OBJECT OUTPUT 

/ASSIGN 16 DISC! FILES(TEMP.SCRL) NEW DELETE BUFFERS#1 5 

/ LINKSEQ ACCESS#(ANY,sANY,ANY.ANY)? ; aw ae 
ALLOCATE#(10,388,256,38) - SOURCE SCRATCH 

vexee OBJ#(1,SYSTEM,LPFBLD) MEM#(390,33608.1888) PRTY=(1.2)3 

/ TIMEse{ MEMS sMEMU for 7 

ASSIGN @® DUMMY DEVICE: sDCON ; p CONTROL 

ZASSIGN § DISC1 FILEsC(TEMP,OBJECT) BUFFERS#1_ , OBJECT INPUT 

/ASSIGN 6 SC DEVICEssDLSTU FILEssFLST BUFFERS#®1 | p LISTING 

/ASSIGN 9 DISC1 DEVICE:sDUPD FILEssFUPD REPLACE: #RUPDs 

4 BUFFERSs2 INDEXED ACCESS#(CREAT,CREAT,CREAT, CREAT)3 ; 
ACCESSssCUPD ALLOCATEs#*LUPD KEYLENS6 - UPDATE FILE 


/ 
/ENO 


nn A SS LS 
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8.13.2 MEMORY PARTITION REQUIREMENTS 
The memory allocation parameter for LPFBLD should be: 
| MEM=(300, 3300, 1000). 


The job extension parameter is dependent upon the blocking factors and the 
number of buffers assigned for the LUNs, but 1000 words is adequate for 
most files. 


8.13.3 LUN ASSIGNMENTS 


The logical unit assignments for LPF BLD are given in table 8-27, Figure 
8-23 illustrates the linkable parts file (LPF) built on LUN 9. 


8.13.4 OPERATION 


LPFBLD first reads a control record from LUN 0. The control record deter- 
mines the mode of execution. Mode 2 is the default LPF BLD mode of execu- 
tion. 


MODE 1: The control record of 'CR#¢B!' implies all of the old keys and data 
are deleted from the linkable parts file. Then processing continues 
the same as in Mode 2. 


MODE 2: The control record of 'MOD#' or an end of file (from DUMMY) mod- 
ifies only those modules input from LUN 5 either by replacing the 
old object, or by creating a new key and inserting the new object. 
The new object is reformatted and output to LUN 9. 


MODE 3: The control record of 'EX¢b' implies that the object for members 
of the linkable parts file assigned to LUN 9 is to be output to LUN 7 
as a sequential file. The names of the modules to extract should 
start in column 5 of the control command and be separated by com- 
mas. The first blank column terminates the scan for member 
names. A control card cannot be continued but multiple control 
commands may be entered. An end of file or a control record 
other than 'EX¥%' terminates LPF BLD in the EXTRACT mode. 

For example, 


EX A,B,C 
EX D 
/* 


would extract modules A,B,C, and D from LUN 9 and output the 
object to LUN 7. An end of file is written at the end of LUN 7. 


MODE 4: The control record of 'DEL¢' implies that the object for the mem- 
bers of the linkable parts file that are named on the control card 
is to be deleted from LUN 9. The syntax of the DELETE (DEL) 
command is the same as for the EXTRACT command in mode 3. 
Multiple DEL commands may be entered if necessary. 
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Table 8-27. LPFBLD Logical Unit Assignments 


Control records are read to select the 
LPFBLD mode of execution. 


Control Input 


One or more object modules, input termi- 
nated by an EOF. This LUN is refer- 
enced for the 'CR' and 'MOD' modes. The 
LUN is rewound before any input is read. 


Object Input 


6 Listing | Listing of IDT names of all object mod- 
ules entered through LUN 5 and error 
messages. 

7 Extract Mode Output | Output LUN for the 'EX' mode. This 


LUN is rewound before any object is 
written and is terminated with an end of | 
file. This LUN is processed as a link 
sequential file or a device that supports 
binary output. 

| 


9 | Update File Key indexed linkable parts file built 
rith a key length of 6 characters and 


ad a Se 


Vivek Se ANN YF eS ee ve 


a logical record length of 80 charac- 
ters. 


8.13.5 ERROR CODES 
e "INDEX FILE FULL" 


This message indicates that the linkable parts file is full and no 
records can be added. The user must define a new file with a larger 
maximum allocation and then recreate the file or use the DXCOPY 
utility to copy the old file into the new file. 


e "INVALID MODE" 


The control record was invalid. Columns 1 through 4 of the control 
record must be 'CR#b', 'MOD$', 'EXbb', or 'DEL}' unless an end 
of file is input. 


"Nename> IS NOT IN FILE"! 


The number name specified on the DEL or EXT control record does 
not exist on LUN 9. The processing does not terminate but just 
skips over the invalid name. 
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ae Data Associated with Key (OBJECT Record) 
PGMO15 1700 PGMO1 

1702 

1706 
TABLES 1700 TABLE 

1706 


Figure 8-23. Format of Linkable Parts File Built by LPFBLD 


8.14 BUILD EDIT FILE UTILITY (BLDEDT) 


The build edit file utility, BLDEDT, constructs keyed indexed files for edit- 
ing under the Interactive File Editor (IFE) of the Interactive Terminal Sub- 

system. Reference the Interactive File Editor description in Section VII of 
this manual for a discussion of the uses for BLDEDT. 


8.14.1 STANDARD JCL PROCEDURE 
The following listing is a standard procedure for BLDEDT: 


o# CREATE BLDEDT,COMMENT, "BUILD EDIT FILE 


/REPLACE BLOEDT e BUILD EDIT FILE . 

JEXEC OBJe(1,SYSTEM,BLDEDT) MEM®(390,550,2008) PRTY™(1,15)3 

/ TIMEsel MEMS@MEM PRTYesPRI TIMEseTIM : 

/ASSIGN 18 DISC1 DEVICEraDIN FILEssFIN BUFFERS#1 - SOURCE INPUT 
/ASSIGN 26 DISC1 DEVICE: s00UT FILEssfOUT REPLACE BUFFERS#23 

/ BUFFERSs:#BOUT INDEXED ACCESS#(ANY,ANY,ANY,ANY)3 

/ ACCESS:sCOUT ALLOCATE#(1,0/256,198) ALLOCATE: #LOUTs 

ne KEYLENS2 - SOURCE OUT FILE 


8.14.2 MEMORY PARTITION REQUIREMENTS 


The following are the memory requirements for BLDEDT utility: 
<stksiz> = 300 words 
<jarea> = 550 words 
<jearea>= 2000 words 


8.14.3 LUN ASSIGNMENTS 
The LUN assignments for BLDEDT are given in table 8-28, 
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8.14.4 OPERATION 


The Build Edit File (BLDEDT) utility is a 2-task program operating under 
DX980. BLDEDT accepts input from a sequential access source (either de- 
vice or file) and builds the key indexed edit file such that the l1-word keys 
are record numbers and the data is the source text. The first record has a 
key of '1", the second ''2", etc. 


Table 8-28. BLDEDT Logical Unit Assignments 


Source Input Sequential device/file 


Key indexed file with key length of 2 charac-. 
ters. 


Source Output 


8.14.5 ERROR CODES 


BLDEDT does not have any unique error codes, The system detects any ab- 
normal condition, Refer to Appendix A for the error codes, 


8,15 LIST EDIT FILES UTILITY (LSTEDT) 


reate-aihwet- meso TTT 


The List Edit Files Utility (LSTEDT) lists an entire IFE File ona formatt- 
able device. Although the List Record edit command of the Interactive File 
Editor lists selected records in an edit file, this utility program lists the en- 
tire edit file. This listing can be valuable for subsequent editing sessions 
since the record number for each record is displayed along with the record, 
The format of the listing is a four digit record number followed by a separator 
blank and the data record. 


8.15.1 STANDARD JCL PROCEDURE 
The following listing is a standard procedure for LSTEDT: 


e# CREATE LSTEDT,COMMENT, "LIST EDIT FILE " 

/REPLACE LSTEDT « LIST EDIT FILE e 

/EXEC OBJ8(1,SYSTEM,LSTEDT) MEM®(390,1780,650) PRTY#(1,15)3 

/ _ TIMEset MEMSSMEM PRTYsePRI TIMEssTIM 

/ASSIGN 18 SC DEVICEss0LST ’, SOURCE OUTPUT 
fo 2@ DISCi DEVICE:sDIN FILEssFIN BUFFERS#1 ". SOURCE INPUT FILE 
/ 


8.15.2 MEMORY PARTITION REQUIREMENTS 
The following are the memory requirements for the LSTEDT utility: 


<stksiz>.= 300 words 
<jarea> = 1700 


<jearea>-= 650 words 


nr  ——— 
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8.15.3 LUN ASSIGNMENTS 


The required LUN assignments for the LSTEDT utility are given in table 
8-29, 


B Table 8-29. LSTEDT Logical Unit Assignments 


Source Output Formattable device 


Source Input Key indexed file with key length of 2 charac- 
ters, 


8.15.4 OPERATION 


The LSTEDT utility is a single-task program that operates under DX980. 
No command input is required, The key indexed file assigned to LUN 20 is 
listed to the formattable device assigned to LUN 10. 


8.15.5 ERROR CODES 


LSTEDT does not have any unique error codes, The system detects abnor- 
mal conditions, Refer to Appendix A for error codes, 


8.16 CREATE, DELETE, OR REPLACE FILE (FILMGR) 


The File Manager Utility (FILMGR) creates, deletes or replaces a file. If 
the user specifies replacement and a file with the same name presently exists, 
FILMGR deletes the old file and creates a new file. 


8.16.1 STANDARD JCL PROCEDURE 
The following listing is a standard procedure for FILMGR: 


«# CREATE FILMGR, COMMENT, "FILE CREATE/NDELETE CAPABILITY" 
/REPLACE FILMGR e FILE CREATE/DELETE CAPABILITY . 

/EXEC OBJs(1,SYSTEM,OXCOPY) MEM®(390,2658,850) PRTY#(1,15)3 

/ . TIMEse1 PRTYssPRI TIMEsa TIN 

/ASSIGN 1 DISC1 DEVICEss0ISC FILEssFILE NEWssNEW REPLACES #REPs 


/ DELETE:sDEL BUFFERSs1 LINKSEQssLIN RELREC3sREL? - FILE TO BE 

/  INDEXEDs®IND ACCESS@(ANY,ANY,ANY,ANY) ACCESS3 ACC}. CREATED/DELETED 
/ ALLOCATES#ALL KEYLEN®6 KEYLEN3sKEY LRECL#643 

/ LRECLs8LRE 

ZASSIGN § DUMMY 

ASSIGN 6 DUMMY 

/ASSIGN 7 DUMMY 

7ASSIGN 6 DUMMY 

“END 
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8.16.2 MEMORY PARTITION REQUIREMENTS 

The following memory parameters are required for the FILMGR utility: 
<stksiz>= 300 
<jarea> = 2650 


< jearea>= 850 


8.16.3 LUN ASSIGNMENTS 


The required LUN assignments for the FILMGR utility are given in table 
8-30. 


Table 8-30. FILMGR Logical Unit Assignments 


File to be created, deleted or replaced Any file type 


Not used Assign to DUMMY 


Not used Assign to DUMMY 
Assign to DUMMY 


to DUMMY 


a 


es 
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8.16.4 OPERATION 


The FILMGR utility executes the load module, DXCOPY. Assignment of 
LUN 1 to the file being managed accomplishes the action specified in the job 
control when processed by DX980 job management, Parameters in the Run 
command indicate if the file is to be created, deleted or replaced. Deleting 
a file need only specify the file name and password (if the file is password 
protected against deleting). Both the NEW and REPLACE specifications re- 
quire further statements to allocate new disc space, define the access code 
and state the type of file. 


8.16.4.1 DELETING FILES, The Run command required to delete a file 
is of the following form: 


//RUN FILMGR DISC=<devnam> FILE=(<fileid>, <filnam>,<pswd>) DEL 


Section II of this manual (Job Control Language) describes the variable 
parameters, The password (pswd>) may be omitted if the file is not pass- 
word protected against deleting, 


8,16.4.2 CREATING A LINKED SEQUENTIAL FILE, The Run command 
necessary to create a new linked sequential file is of the form: 


//RUN FILMGR DISC=<devnam> FILE=(<fileid>, <filnam>,<pswd>) NEW LIN; 
ACC=(<integ>, <integ>, <integ>,<integ>) ALL=(<itrks>, <trknum>,< prwrds>,< mtrks>) 


Section II of this manual describes the parameters in this statement. A 
sample Run command to create a 50-track, linked sequential file that anyone 
can access appears as follows: 


//RUN FILMGR DISC=DISC1 FILE=(USEROI, FILE1) NEW LIN; 
ACC=(ANY, ANY, ANY, ANY) ALL=(50, 0, 256, 60). 


The file is created on DISCI1, has no password, has a physical record length 
of 256 words and a maximum allocation of 60 tracks, The search for avail- 
able space starts with track zero. 


8.16.4.3 CREATING A RELATIVE RECORD FILE, The RUN command 
used to create a relative record file appears as: 


//RUN FILMGR DISC=<devnam> FILE =(<fileid>,<filnam>,<pswd>) NEW REL; 
ACC=(<integ>, <integ>, <integ>, <integ>); 
ALL=(<itrks>,<trknum>,<prwrds>,<mtrks>) LRECL=<Irchar> 


The allocation of a relative record file is similiar to a link sequential except 
that the logical record length, <lrchar>, must also be specified. A sample 
allocation of a relative record file with a physical record length of 256 words 
and a logical record length of 64 characters appears as follows: 


//RUN FILMGR DISC=DISC1 FILE=(USERO1, FILE2, ABC); 
NEW REL ACC=(ANY, PSWD, CREAT, CREAT); 
ALL=(50, 0, 256, 50) LRECL=64 
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This file is created with a password of ABC, Note the initial and maximum 
track allocation must be the same since the relative record file is not ex- 
pandable. 


8.16.4.4 CREATING A KEY INDEXED FILE, A key indexed file may be 
created with a Run command of the form: 


//RUN FILMGR DISC=<devnam > FILE=(< fileid>,<filnam>, <pswd>) NEW IND; 
ACC=<(<integ >, <integ>,<integ>, <integ>); 
ALL=(intrks>,<trknum>,<prwrds>,<mtrks>) KEYLEN=<klchar> 


The parameter, <klchar>, specifies the key length in characters. The maxi- 
mum key length is 30 characters. To create a key indexed file with a key 
length of 6 characters, the following command may be used: 


//RUN FILMGR DISC=DISC2 FILE=(SYSTEM, FILE3); 
NEW IND ACC=(ANY, PSWD, CREAT, NONE); 
ALL=(10, 0, 128,20) KEYLEN=6 


This file is created on DISC2 and has a physical record length of 128 words. 


8.16.4.5 REPLACING FILES, If the replace (REP) parameter is specified 
instead of new (NEW), any file with the specified name is deleted before the 
new file is created, All information in the old file is destroyed. 


8.16.5 ERROR CODES 
Error messages for FILMGR are the same as those for DXCOPY, 
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ERROR MESSAGES | 
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AS OF 84/89/75 


Oona na aN = 


12 


eOUT OF PARTITION REFERENCE IMPLYED BY PARAMETERS OF AN SVC CALL 
@JOB EXTENSION AREA TOC SMALL 

wNO SPACE IN DSCA 

eILLEGAL NUMBER OF PARAMETERS IN 8VC LIST 

@T/0 ATTEMPTED ON NON@ASSTGNED LUNO 


71/0 ATTEMPTED WITHOUT OPFN 


eDUPLICATE OPEN ON SAMF L''NO 
eWAIT CONTROL LIST ERROR FOUND Ob USER SUSPEND 
=PRIORITY ERROR 

@CPU TIME EXCEEDED 

eILLEGAL USER POST 

eILLEGAL INSTRUCTION 

eA NONWEXISTENT SVC *AS ISSUED 

eUSER HAS REQUESTED ACCESS TO A PRIVILEGED svc 
eILLEGAL SVG ARGUMENT eOUTSIDE USER PARTITION 
@PTR TO SVC ARG LIST OLTSTDE USER PARTITION 
wINVALID DEVICE I D 

eNO SPACE IN PCB 

eNO SYSTEM LUNO ® 144i 

eUSER FILE DIRECTORY OVERFLOW 

eMASTER FILE DIRECTORY OVFRFLOW 

“PREVIOUSLY DEFINED USER YD 

eILLEGAL USER ID 

eATTEMPT TO DELETE SYSTEM DISC MFD 

@ INVALID ABNORMAL JOB TER“INATION CODE 
eUNDEFINED PILE 

@UNDEFINED USER ID 

“ATTEMPT TO REPLACE PREV ASSIGNED FILE 
@PREVIOUSLY DEFINED FILE 

eINVALID FILE TYPE 

eINSUFFICIENT TRK SPACF OY DEFINE 

eINSUFF, CONTIG, TRK SPACE ON DEFINE 
eEXCEEDED DISC SIZE ON DEFINE 

eZERO KEY LENGTH FOR DEFINE 

eREADY JSB FILE BAD 

eATTEMPT TO DELETE A SHARED FILE 

eINVALID FILE DISPOSITION CODE 

eDEVICE OFFLINE 

eATTEMPT TO SHARE UNSHARABLE DEVICE 

eATTEMPT TO SHARE BLOCKED DEVICE 

wATTEMPT TO ASSIGN EXCL A SHARED PASSED RESOURCE 
eOPERATOR CANCELLATION 

eTOO MANY JUB STERS 

eINVALID JCB 

eINVALIO INPUT LOT 

«JOB NO/STEP NO, NOT IN SYSTEM 

eJOB NAME NOT IN SYSTEP 

eATTEMPT TO ILLEGALLY ACCESS FILE 


POTENTIAL RESOURCE DEADLOCK DUE TO INCOMPLETE PASSING 


wINVALID JCH SIZE SPECIFIED 

wATTEMPT TO DEASSIGN UNASSIGNED LUNO 

#TOQ MANY JOB STEPS (18) IN ONE JOB STRING 
@PARENT JOB ENDED BEFORE ‘'0B8 STRING STARTED 
eLOAD MODULE TOO BIG FOR SPECIFIED USER SPACE, 
eNO JOB INITIATION SYSTEM TASK FOR JOB 

@LOAD MODULE LOAD NO GOOD 
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36 #ATTEMPT TO ASSIGN TO DISC DIRECTLY 
59 @DEASSIGNMENT OF OPEN DEVICE/FILE 
6@ SOQMMSYSTEM OUTPUT QUEUE OVERFLOW 

61 SOQMeTOO MANY OLITPUT FILES 


62 “MEMORY PARTTY ERROR 

63 @MEMORY PROTECT ERROR » ANDRESSING ERROR 
6a ePRIVILEDGE INSTRUCTION VIOLATION 

65 *RESOURCE STACK OVERFLOW 

66 #BYTE RELOCATION ADDR BAD IN LD FOC 

67 “MIP NO BAD FOR LOAD OR LMADR 

69 eLOAD OR LOADR EXTENDS BEYOND USER MEM 


78 GPSeCAN NOT ALLOCATE INPUT DFVICE (REASON@MEMORY OR DEVICE NOT AVAILABLE) 
7{ BPSeREAD ERROR ON INPUT DEVICE 

72BPSOCeILLEGAL OR MISSING "JOB" COMMAND 

7SBPSOCeILLEGAL RUN COMMAND 

74 BPSeILLEGAL DATA COMMAND 

75 BPSeTOO MANY INPUT DATA FILE 

76 BPSeNO OF INPUT DATA FILES UNMATCHED WITH NO OF ASSIGNED INPUT DATA FILES 
77 8PSeDATA COMMAND UNMATCHED WITH INPUT ASSIGNMENTS 

78 BPSeOQUTPUT QUEUE ERROR = REJNITIALIZE QUEUE TO USE nos 


82 @JOB/STEP NUT IN ROLL FILE DIRECTORY 
Bt eNO SPACE AVAILABLE IN ROLL PILE 

82 wINSUFFICIENT ROLLABLE ME“ORY 

83 eROLL PERFORMED NORMALLY 

64 *ROLL FILE CLOBMERED 


86 BPSeDATA ERROR ON LINE PRINTPR 
86 BPSeEND OF FILE ENCOUNTERED WHILE SKIPPING RECORDS 


87 eREQUEST POR MORE MEMORY THAN IN FREE MEMORY 

88 @DEVICE FILE REQUESTED AT RUNTIME NOT AVAILABLE 
a9 eINVALID JOB STEP NUMBER YN JSB 

98 eILLEGAL NUMBER INPUT 

91 eILLEGAL COMMANDO 

92 =TOO MANY JOBS IN THE 8YSTEM 

93 eLUNO LDT NOT FOUND 

94 eNOT A RR FILE 


95 JCLeUSERMID SPECIFIED FOR PROCEDURE LIGRARY DOES NOT EXIT 

96 JCLePROCEDURE LIBRARY DOES NOT EXIST UNDER SPECIFIED USEReID 

97 JCLeUSER CAN'T GAIN ACCESS TO PROCEDURE LIBRARY BECAUSE OF INTEGRITY CODE 
98 JCLeSPECIFIED PROCEDURE DOES NOT EXIST IN PROCEDURE LIBRARY 

99 JCLeHARDWARE FAILURE WHILE ATTEMPTING READ FROM SPECIFIED PROCEDURE LIB. 
180 JMmATTEMPTED TO USE FILE OF RESTRICTED USER ID 

161 OCeHAROWARE 1/0 ERROR IN OP, COMMUNICATIONS 

1@2 OCewINVALID MESSAGE ID 

183 OCeINVALID OPERAND IN OP COMMUNICATIONS 

104 OCeINVALID ARGUMENT LIST IN OP .COMMUNICATIONS 

186 OCeINVALID JOB NUMBER PASSEN IN OP, COMMUNICATIONS 

186 OCeATTEMPT TO OFFLINE SY8TE™“ pDIS¢e OR SYSTEM CONSOLE 

{07  OCeNO SPACE IN DSCA OR JEA 

198 OCeINVALIO OP COMMUNICATIONS COMMAKD 

109 OCeJOB NUMBER NOT FOUND BY OP COMMUNICATIONS 

110 OCeIN OJCBPR, INVALID SIZE REQUIRED FOR '//JOB' Jsp 

£41  OCeINVALID NUMBER USED FOR SKIP COMMAND TO BATCH OUTPUT SPOOLER 
112  OCeUNDEFINED COMMAND GIVEN TO BATCH CUTPUT SPOOLER 
201 I0eDEVICE NOT READY 

262 IQweCONTROLLER ERROR 

283  I0eDATA ERROR 

204 IOeCONTROLLER BUSY ERROR 
206 YOeWRITE PROTECT ERROR: 
286 OeEOR ERROR © 
207 YIOeREAD@AFTEReWRITE ERROR 
288 ZIO@DEVICE OFFLINE 

209 IOeILLEGAL OPetoDE 
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242 I0eDEVICE TIMEOUT (DEVICE DTD NOT RESPOND) 

233 FMeNO SPACE AVAILABLE ON DISC VOLUME 

234 FMeFILE FULL 1/0 ERROR . 
235  FMeATTEMPTED WRITE, LOGICAL RECORD >= PHYSICAL RECORD «+ OVERHEAD 
236 FMeHARDWARE FAILURE ON DISC VOLUME. 

537  FMeINDEX, REPLACE ATTEMPTED ON NON@EXISTING KEY 

238 FMmeEXISTING KEY FOUND ON 'WRITE! OPeCONE e@OPERATION NOT PERFORMED 
239 FMe INDEX, WRITE/REPLACE ATTFMPTED CN NON@KEYED RECORD 
24g  FMmINDEX, REPLACE ATTEMPTED ON KEYED RECORD 

241  FMeINDEX, REPLACE ATTEMPTED ON NULL DATA (NON-EXISTENT) 
243 §EMeINDEX, REL@REC, NO KEY AFTER SEARCH 

249 FMeINVALID FILE TYPE (NON@EXISTENT) 

25¢ FMeINSUFFICIENT TRACKS FOR ALLOCATION 

251 FMwINSUFFICIENT CONTIGUOL'S TRACKS LEFT ON DISC VOLUME 
252 FMeALLOCATION EXCEEDS DISC VOLUME CAPACITY 

054 FMeUNABLE TO ALLOCATE BUFFERS BECAUSE OF JOB EXTENSION SIZE 
256 FMeINSUFFICIENT NUMBER OF B'FFERS FOR ATTEMPTED OPERATION 
237 EM#OPCODE IS EITHER NON@FXISTENT OR ILLEGAL 

258  FM*ACCESS VIOLATION, INTEGRTTY ERROR 

404 CSCNeOVERFLOW OF KEYWORD AREA 

402 CSCNeOVERFLOW OF PACKED STRING STORAGE 

483 CSCNeR.H.S, OF EXPRESSION OR TERM MISSING 

404 CSCNeILLEGAL EXPRESSION SUBSCRIPT 

405 CSCNeMISSING DELINETER AFTER COMMAND ID 

406 CSCNeNUMBER IS LARGER THAN 16 BITS 

487 CSCNeOPERAND STARTS WITH ILLEGAL CHARACTER 

408 CSCNeILLEGAL DIGIT IN DECIMAL NUMBER 

489 CSCNeMISSING DELIMTER NJETWEEN OPERANDS 

418 CSCNeMISSING DELIMETER BETHEE’ SUBSCRIPTS 

ALL CSCN@ILLEGAL CHARACTER PRECEENS COMMAND 

442 ITSeRUN COMMAND DOES NOT CONTAIN A LABEL OR AN EXPRESSION 
4143 CSCNeMISSING EGIIAL SIGN IN ASSIGNMENT 

414 CSCNPRIGHT HAND SIDE OF ASSIGMENT MISSING 

4148 CSCNeMORE THAN NE = SIGN IN FXPRESSYON 

416 CSCNeSIZE OF PACKED STRING < % CHARACTERS 

447 CSCNeUPPER BOUND ON KEYWORD AREA < 1 

418 CSCNeNUMBER OF RESERVED LABELS < @ 

419 CSCN@STARTING CULUMN POR SCAN NOT IN RANGE (0879) 

428 JCLeFOR A NEW FILE, USER DIRECTORY NAME DIFFERS -FROM CURRENT USER 
421 JCbLeJSB MUST CUNTAIN DEVICE TNDEX, NOT THE PDT ADDRESS 
422 JCLeDEVICE INDEX MUST BE «<= 255 

423 JCLePHYSTCAL RoL. < KEY@LENGTH + 14 

424 JCLeFILE HAS BAD ACCESS CODE VALUE 

426 JCLeBOTH 'DELETE' & 'PASS' SPECIFIED 

426 JCL@LOGICAL Robe > PHYSICAL RL. 

427 JCLeLOGICAL Reb. A MULTIPLE %F 32 

628 JCLeDEVICE NOT SPECIFIED OR TNCORRECTLY SPECIFIED 

429 JCLeUSER ID NOT SPECIFIED 

438 JCLeFILE NAME NOT SPECIFIED 

433 JCLew PRIORITY LEVELS > 31 OR < 1 

434 JCLeJOB8 STEP PRIORITY > 31 OR « | 

438 JCLeOBJ, VOLUMN ID 18 > 28 OR <1 

436 JCLeTCB STACK SIZE < 1 WORD 

437 JCLeILLEGAL COMMAND AFTER 'DFLETE! 

439 JCLeTIME LIMIT < 1 SECOND 

443 JCLe# PRIORITY LEVELS + JOB STEP PRIORITY IS > 34 OR « 1 
444 JCLeJOB EXTENSION SIZE <# TCR STACK SIZE + 15 WORDS 

4466 JCL=VOL USER If NOT INITIALY7ED 

447 JCLeVOLUMN FILE NOT INITIALIZED 

448 JCheVOL USER ID OR FILE NAME > 6 CHARS 

449 JCLeVOL PASSWORD > 4 CHARS 

45@ JCLeWRONG # OF OPERANDS ON THE RIGHT SIDE OF AN EXPRESSION 
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454 
452 
453 
454 
456 
457 
458 
459 
46e 
464 
462 
463 
464 
465 
466 
467 
468 
469 
470 
471 
475 
476 
477 
478 
479 
480 
481 
490 
491 
492 
581 
505 
540 
S541 
512 
520 
524 
822 
523 
626 
82? 
528 
529 
530 
531 
832 
833 
534 
834 
838 
536 


JCLeOPERAND IS NOT A LABEL OR A SUBSCRIPTED EXPRESSION 
JCLeOPERAND ON THE RIGHT SIDF IS NOT A LABEL OR A NUMBER 
JCLeBAD DEVICE NAME 

JCLeBLOCK SIZE < 1 

JCL©REDEFINITION CF LUNC IN TOBSTEP 

JCL@PASSHORD > 4 CHARACTERS 

JCLeUSER ID OR FILE NAME > 6 CHARACTERS 

JCLeNUMBER BUFFERS < 1 

JCLeRE*INITIALIZATION OF JSB ITEM 

JCLeBAD LABEL FOR ACCESS CODF 

JCLeINITIAL TRACKS < 1 

JCLeFIRST TRACK ADDRESS «< B 

JCL@PHYSICAL RECORD LENGTH < 32 

JCL@PHYSICAL R,L, NOT MULTIPLE OF 32 

JCLeMAX TRACKS < CINITIAL OR 1) 

JCL=LOGICAL RECORD LENGTH < 1 

JCL@LUNO NUMBER NOT IN RANGE @ TO 254 

JCLeKEY LENGTH NOT IN RANGE ¢ TO 32 

JCL@OPERAND DOESN'T START WITH LABEL 

JCLeKEYNAME ON THE LEFT SIDE OF AN EXPRESSION IN NOT DEFINED 
JCLeOVERFLOW OF KEYeENTRY TARLE 

JCL@OVERFLOK Of KEYeREFERENC® TABLE 

JCLeOVERFLOW OF KEY=CHARS TASLE 

JCL@DISC ERROR ON LUNO 4 

JCLeINDEX KEY NAME FOLLOWING 'CREATE! OR ‘REPLACE’ > 6 CHARACTERS 
JCLeGREATER 31 ASSIGN CARDS TN THIS JOB STEP 

JCLeICREATE! OR 'REPLACE! NOT FOLLOWED BY INDEX KEY NAME 
JCLeDEV INDEX « 21 OR FILE VOL > 20 

JCL@PHYSICAL Rel, (CHAR) «< (KEYLEN # 2 # 14) 

JCLeFILE TYPE NOT SPECIFIED “HEN NEEDED (DEFINE, ETC.) 
JCLeKEYNAHE IS NOT IN RESERVFD WORD LIST 

JCLe# OF ENTRIES IN TABLE PASSED TO 'CRLOOK' IS NEGATIVE 
JCLeSUBSCRIPTS APPEAR ON LHS OF EQUAL SIGN 

JCLeTRIED TO FETCH NON@EXISTANT RHS SUBSCRIPT 

JCLeTRIED TO FETCH NON@EXISTANT OPERAND 

JCLeI/0 ERROR ON LUNO ® 2, ECHO PRIAT) 

JCLeEOF, EOM, OR I/O ERROR OY LUND @ ft, (JCL IN) 
JCLeMISSING SLASH IN FIRST COLUMN OF JCL 

JCLeOVERRIDING KEY WORD ON RIN CARD DOES NOT EXIST FOR THIS PROCEDURE 
JCLeNUMBER OF KEY*ENTRIES IS NEGATIVE 

JCLeNUMBER OF KEY@ENTRIES > 19 

JCLeNUMBSR OF KEY@REFERENCES < @ OR > 19 

JCLeNUMBER OF KEY@CHARACTERS NOT IN RANGE @ TO 12¢ 
JCLeKEYeENTRY POINTS TO KEY REFERENCE WHICH IS NOT INITIALIZED 
JCLeKEYeENTRY FLAG INDICATES THAT NEITHER JCB NOR LOT 38 BEING INITIALIZED 
JCLeLDT NUMBER REFERENCE BY KEYwENTRY IS NOT IN RANGE @ 70 30 
JCLePRODUCTION NUMBER NOT IN RANGE 3 TO 31 

JCLeJOB STEP NUMMER NOT IA RANGE ¢ TO 15 

JCLeJOB STEP NUMBER NOT IN RANGE 1 TO 18 

JCLeKEYeCHARS HAS LESS THAN 7 CHARACTERS 

JCLeCHARACTERS OVERFLOW KEYeCHAR STORAGE 
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APPENDIX B 
SAMPLE JCL SEQUENCES 


Job Control Sequence (JCS) for particular system installations are supplied 
on file JCLSRC contained on the disc image tape. List this file after com- 
pleting installation. 


This appendix contains sample listings of some sequences. These samples 
are not necessarily the exact sequences supplied on the previously mentioned 
tape. 
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eo WUPDATE 
e#TAPE 


'Dx98q JCL SOURCE FILE®*, 
a# CREATE ASMBLR,COMMENT, "ASSEMBLE 
/REPLACE ASMBLR 


','85/15/75', 
” 


« ASSEMBLE . 


/EXEC OBJe(1,SYSTEM,ASMBLR) MEM®(396,5000,1000) PRTY#(1,15)3 


/ 
/ASSIGN 
/ASSIGN 
/ ASSIGN 
/ASSIGN 
/ASSIGN 
/ 
/ 


NOW 2 @ 


/ 
Geonret 16 


VEND 


TIMEaet MEM3eMEM PRTYg2PRI TIME: sTIM 

DUMMY DEVICE:#DMSG SHARE F 
DUMMY DEVICEssDCON SHARE? eSCON 
DISC{ DEVICE:#0SRC FILE:2FSRC BUFFERS#! : 
SC DEVICE: =sDLST FILE:#FLST SHARES sSLST RUFFERS#1 
DISci DEVICEssh0BJ FILE:sFOBJ NEWs*NOBJ3 

REPLACE: #ROBJ BUFFERS#1 LINKSEQ} 

ACCESS® (CANYsANYSANYPANY) ACCESS3 8COBJ? 
ALLOCATE#(1,0,64,10) ALLOCATES #LOBJ ! 
DISC! FILE=(TEMP,SCRL) NEW BUFFERS#1 LINKSEO} 
ACCESS®(ANY,ANYSANYSANY) ALLOCATES (10,586,256,50) . 


24 CREATE ASMGO ,COMMENT,"EXECUTE ASM LANG GENED LM ® 


/REPLACE ASMGO 


e EXECUTE ASSEMBLY LANGUAGE GENERATED LOAN 


/EXEC OBJs(1,USERG1,G0) MEMB(302,4980,1900) PRIYS(1.15)7 


/ 


TIMESi@@ OBJ:s0BJ MEMseMEM PRTYsePRI TIME TIM 


/ASSIGN 4 DUMMY LUNOSSLUN4 DEVICE s@DEVva4 FILE@SFIL4 BUFFERS=2, 
/ASSIGN 5 SC LUNOs@LUNS DEVICEssDEV5 FILEs#FIL5 BUFFERS#®2, 
/ASSIGN 6 SC LUNOSSLUN6 DEVICEs2DEV6 FILE:sFIL6 BUFFERS#2, 
/ASSIGN 7 DUMMY LUNOSSLUN7Z DEVICEseDEV7 FILEssFIL7 BUFFERS#®2. 
/ASSIGN 8 DUMMY LUNOSSLUNS DEVICEs2DEV8 FILEssFIL8 BUFFERS#2. 
7END 

# CREATE ASMLGO,COMMENT, "ASSEMBLE, LINK, AND GO " 


/REPLACE ASMLGO 


o8 tor 
Verse vturenenevere 


7ExeEC 
/ 
/ASSIGN 8 
/ASSIGN 4 
/ASSIGN § 
/ASSIGN 6 
/ASSIGN 7 
6 


/ 
an i 


e« ASSEMBLE, LINK, AND GO. 
ASMBI8) MEMar3ag,59a9,19090) PRTY#(1,15)3 


lvuws vo veaw 


evevrTetu 


TIMEs=1 MEMS SMEMA 

DUMMY DEVICE3#DMSG SHARE . 
DUMMY DEVICEssDCON SHARES sSCON ° 
DISCi1 DEVICE: sO0SRC FILEssFSRC BUFFERS#1 , 
SC DEVICErsDLSTA FILEssFLSTA BUFFERS#1 ° 
DISC! FILES(TEMP,OBJECT) NEW BUFFERS=s1 LINKSEQ? |, 
ACCESS®(ANY,ANY,ANY/ANY) ALLOCATES(16,508,64,18) . 
DISC1 FILE#(TEMP,SCRL) NEW BUFFERS#1 LINKSEQ? : 
ACCESS®CANYSANYSANYsSANY) ALLOCATES (16,500,256,58) . 


7EXEC OBJs(1,SYSTEM,OXOLE) MEM#(309,12000,3000) PRTY#(1,15)3 


/ 
4ASSIGN 
/ ASSIGN 
7 ASSIGN 


mown 


/ 
/ASSIGN 9 
/ASSTGN 16 
/ASSIGN 13 
/ 


TIMEset MEMS 8MEML 
DISC! FILES¢TEMP,OB8JECT) DELETE BUFFERS#1 < 
Sc DEVICEssDLSTL FILeEssFLSTL BUFFERS#1 : 
D1sci FILEs(TEMP.LM) NEW BUFFERSs{1 RELREC LRECL#643 
ACCESSBCANY,ANYsANYSANY) ALLOCATE#(19,580,32.10) e 
DUMMY ‘ 
DISci FILE*(TEMP,SCRL) DELETE BUFFERS#1 ‘ 
DISC{ FILES(TEMP,SCRR) NEW DELETE BUFFERS#1 RELREC3 
ACCESS#®(ANY,ANYSANYSANY) ALLOCATES (10,5300,128,10)3. 

LRECL #100 ‘ 


/ 
/EXEC OBJs(1,TEMP.LM) MEMs(380,490G,1080) PRTY8(1-15)5 


/ 

/ASSIGN 4 
/ASSIGN 5 
/ASSIGN 6 
/ASSIGN 7 
ZENO 


TIMEsi@@ MEMssMEMG TIME ss TIMG 


* 


DUMMY DEVICEssDEV4 FILEssFIL4 BUFFERS#2 , 
SC DEVICESsDEVS FILEssFIL5 BUFFERSs2 , 
SC DEVICESeDEV6 FILEssFIL6 BUFFERS#2 ° 
DUMMY DEVICEssDEV7 * 


#'eAat, 


SYSTEM MESSAGE 
CONTROL /MESSAGE 
SOURCE INPUT 


eSOURCE {.IST/ERROR 


OBJECT OUTPUT 
SOURCE SCRATCH 


MODULE , 


USER 
USER 
USER 
USER 
USER 


PROG 
PROG 
PROG 
PROG 
PROG 


LUN 
LUN 
LUN 
LUN 
LUN 


On Aaa 


SYSTEM MESSAGE 
CONTROL/MESSAGE 
SOURCE INPUT 
SOURCE |.IST/ERROR 


OBJECT OUTPUT 
SOURCE SCRATCH 
PRIMARY INPUT/CON 
LOADMAP LIST/ERR 
LOAD MOD OUTPUT 


LIBRARY FILE 
LINKSEQ SCRATCH 


RELREC SCRATCH 


USER PROG LUN 4 
USER PROG LUN 5 
USER PROG LUN 6 
USER PROG LUN 7 
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0% CREATE ASMLNK,COMMENT, "ASSEMBLE AND LINK 7 


/REPLACE ASMLNK 


e ASSEMBLE AND LINK , 


EXEC OBJs(1,SYSTEM/ASMBLR) MEM#(398,5000,1000) PRTY=(1, 715)5 


/ 


TIMEsel MEMS eMEMA 


/ASSIGN @ DUMMY DEVICE2#0MSG SHARE » SYSTEM MESSAGE 
/ASSIGN 4 DUMMY DEVICEssDCON SHARE? sSCON » CONTROL/MESSAGE 
/ASSIGN § DISC1 DEVICEs#DSRC FILFs=FSRC BUFFERSS! » SOURCE INPUT 
/ASSIGN 6 SC DEVICErsOLSTA FILEteFLSTA BUFFERS#1 . SOURCE I.IST/ERROR 
/ASSIGN 7 DISC{ FILE=C(TEMP, OBJECT) NEW BUFFERS=1 LINKSEQs 

/ ACCESS®(ANY,ANY,ANY,ANY) ALLOCATE#(10,300,64,10) . OBJECT OUTPUT 
gasarnn 16 OISC1 FILE®(TEMP,SCRL) NEW BUFFERSS1 LINKSEQS 


/ 


ACCESS®(ANY,ANY/ANYANY) ALLOCATES (16,300,256,38) . 
VEXEC OBJs(1,SYSTEM,DXOLE) MEM=®(306,12008,3000) PRTY=(1,15)3 


TIMEsel MEMS sMEML 


SOURCE SCRATCH 


/ASSIGN 5 DISC1 FILE#(TEMP,OBJECT) DELETE BUFFERS#1 PRIMARY INPUT/CON 
/ASSIGN 6 SC DEVICE:sDLSTL FILEssFLSTL BUFFERS#1 LOADMAP I.IST/ERR 
/ASSIGN 8 DISC1 DEVICErsDLM FILES(USER@1,G0) FILES ™FLMs 

/ REPLACES#RLM BUFFERS®4 RELREC3 

/ ACCESSS(ANY,ANYSANYsANY) ACCESS3 BCLM3 ; 

/ ALLOCATE#(10,0,32,18) ALLOCATEssLLM LRECL#64 » LOAD MOD OUTPUT 
/ASSIGN 9 DUMMY DEVICE?#0LIB FILEssFLIB BUFFERS#1 » LIBRARY FILE 
/ASSIGN 1@ DISC1 FILE#(TEMP,SCRL) DELETE BUFFERS#1 . LINKSES SCRATCH 
/ASSIGN 13 DISC1 FILES(TEMP,SCRR) NEW DELETE BUFFERS#¢ RELREC3 

/ ACCESS®(ANYSANY,ANYSANY) ALLOCATES (10,500,128,18)3. 

/ LRECL #100 .- RELREC SCRATCH 
/END 


»# CREATE ASMUP ,COMMENT, "ASSEMBLE MOD AND UPDATE LPF ® 


/REPLACE 


ASMUP 


« ASSEMBLE MODULE AND UPDATE LPF . 


/EXEC OBJe(1,SYSTEMsASMBLR) MEM=(390,6600,2800) PRTIVY#(1,2)3 


/ TIMEsel MEMS SMEMA 
/ASSIGN @ DUMMY DEVICE? s0MSG . SYSTEM MESSAGE 
7ASSIGN 4 DUMMY DEVICES sDCON | > CONTROL/MESSAGE 
JASSIGN 5 DISC1 DEVICEsDSRC FILErsFSRC BUFFERS®#! » SOURCE INPUT 
/ASSIGN 6 SC _ DEVICES sDLSTA FILEreFLST BUFFERS®1 . SOURCE I.IST/ERROR 
/ASSIGN 7 DISC FILES(TEMP,OBJECT) NEW BUFFERS#1 LINKSEG? 

/ ACCESSS(ANY,ANYPANY,ANY) ALLOCATE®(18,308,64,20) . OBJECT OUTPUT 
/ASSIGN 16 DISC1 FILE®(TEMP.SCRL) NEW DELETE BUFFERS#=13 


/ LINKSEG ACCESSS(ANY,ANY,ANY,ANY)? 

/ ALLOCATE# (10,308,256, 38) 

7EXEC OBJs(L,SYSTEMsLPFBLD) MEM=(390, 688, 1000) PRTY8(1,2)3 
/ TIMEsel MEM? eMEMU 


SOURCE SCRATCH 


/ASSIGN @ DUMMY DEVICEs*DCON . » CONTROL 
/ASSIGN 5 DISC1 FILES(TEMP,OBJECT) BUFFERS#1 - OBJECT INPUT 
/ASSIGN 6 SC DEVICEssDLSTU FILEtsFLST BUFFERS#1 p LISTING 
ASSIGN 9 DISC{ DEVICEssDUPD FILEssFUPD REPLACE s®RUPD3 . 

/ BUFFERS®2 INDEXED ACCESS®(CREAT,CREAT,CREAT,CREAT)) 

/ ACCESS#8CUPD ALLOCATEss_LUPD KEYLENS6 . UPDATE FILE 
7END 


o# CREATE BIR ,COMMENT,*"BATCH INPUT READER " 
/REPLACE BIR . BATCH INPUT READER . 

/EXEC OBJa(1,SYSTEM,BIR) MEM=(309,900/608) PRTY=(1, 5)5 
/ PRIV TIMEsei PRTYssPRy TIMEs*TIM 

/ASSIGN 16 CRi DEVICESsDIN INPUT STREAM 
/ENO 

»# CREATE BIS  ,COMMENT,"BATCH INPUT SPOOLER " 

/REPLACE BIS « BATCH INPUT SPOOLER.. 

/EXEC OBys(1,SYSTEM,BIS) MEMs(309,1208, 800) PRTY#=(1,5)) 

/ PRIV TIMES@1 PRTYssPRY TIMEssTIM MEMS @MEM 

/ASSIGN 5 CR1 DEVICE =DIN "INPUT STREAM 
/END 
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«# CREATE BLDEDT,COMMENT, "BUILD EDIT FILE . 

/REPLACE BLOEOT « BUILD EDIT FILE . 

/EXEC OBJs(1,SYSTEM,BLDEDT) MEM®(390,550,2088) PRTY#(1,15)3 

/ TIMEsel MEMS@MEM PRTY:SPRI TIMEssTIM : 

ASSIGN 18 DISC1 DEVICEts0IN FILEtsFIN BUFFERSS1 - SOURCE INPUT 
/ASSIGN 26 DISC1 DEVICEssNOUT FILEssFOUT REPLACE BUFFERS#=23 

/ BUFFERSs#BOUT INDEXED ACCESS#(ANY,ANY,ANYSANY)3 

/ ACCESSrsCOUT ALLOCATE#(1,80256,168) ALLOCATEssLOUTs 

/ KEYLENS2 - SOURCE OUT FILE 
7END 

e# CREATE BOS sCOMMENT, "BATCH OUTPUT SPOOLER " 

/REPLACE BOS e BATCH OUTPUT SPOOLER . 

/EXEC OBJsCi,SYSTEM,BOS) MEMs(309,1160,808) PRTVs(1.5)3 

/ PRIV TIMES@1 PRTYs#PRY TIMEssTIM 

/ASSIGN § SC DEVICEssDOUT « OUTPUT LISTING 
/ASSIGN 6 DUMMY DEVICES sONEW FILEa(SYSTEM,NEWS) FILEseFNEWS 

/ BUFFERSS1 

/END 

o# CREATE CATFIL,COMMENT, "LIST FILES UNDER A USER . 

/REPLACE CATFIL e LIST FILES UNDER A USER . 


jaa OBJs(i,SsySTEM,CATFIL) NEM®(30061850,670) PRTYS(1,5)3 
PRIV TIMESed PRTYsSPRY 

7ASSIGN 8 SC DEVICEssDCON SHAREssSCON «, CONTROL 

ASSIGN 6 SC DEVICESsOLST FILEssPLsT SHARESsSLST BUFFERS#! FILE LISTING 

“END 

o# CREATE CATLOG, COMMENT, *LIST, CREATE,OR DELETE USERS" 

/REPLACE CATLOG « LIST, CREATE, OR DELETE USERS , 

EXEC OBJa(1,SYSTEM,CATLOG) MEM®(390,4600,670) PRTY#(1,5)3 

/ PRIV TIMES=@1 PRTY3sPRY 

/ASSIGN @ SC DEVICEseDCON SHARE? sSCON - CONTROL 

/ASSIGN 6 SC DEVICErsDLST FILEssFLST SHARES®SLST BUFFERS#1.USER LISTING 

7END 

o# CREATE DEBOaa COMMENT, "PROGRAM DeAUC AID ” 

/REPLACE DEBOBO e PROGRAM DEBUG AID , 

EXEC OBJe(1,SYSTEM,DEB960) MEM®(398,6900,600) PRTY#(1,15)3 

/ TIMEse! MEMSeMEM PRTYsePRI TIMEsstrIM 

ASSIGN oFB SC DEVICE: sDCIN 

/ASSIGN oF 1 SC DEVICE: sDMSG 

/ASSIGN oF2 DUMMY DEVICEssDCLST 

/ASSIGN aF3 SC _ -—DEVICEseOUMP FILEseFUMP BUFFERSS1 

/ASSIGN oF4 DISC] DEVICEssD0BJ FILEssFoBJ BUFFERS#1 


CONTROL INPUT 
SYSTEM MESSAGE 
CONTROL LISTING 
MEMORY DUMP 
RELOC OBJECT IN 


27 ~*~ 2 we * 


/ASSIGN @ DUMMY DEVICEssDEVe : » USER PROG LUN 2 
/ASSIGN 4 DUMMY DEVICEssDEV4 FILEssFIL4 BUFFERS#1 » USER PROG LUN 4 
/ASSIGN 5 DUMMY DEVICEreDEVS FILEssPILS BUFFERS=1 » USER PROG LUN 5 
/ASSIGN 6 DUMMY DEVICEssDEV6 FILEssFIL6 BUFFERS#! » USER PROG LUN 6 
/ASSIGN 7 DUMMY DEVICEssDEV7 | » USER PROG LUN 7 
/ASSIGN 6 DUMMY LUNOSSLUNS DEVICE: eDEVs . USER PROG LUN 8 
/END 

o# CREATE DUMPLP,COMMENT, "DUMP LPF FROM CISC TO MT " 

/REPLACE DUMPLP. « DUMP LPF FROM DISC TO MAG TAPE , 

/EXEC OBJe(1,SYSTEM,DXCOPY) MEM®(390,49608,3080) PRTY#(1,2)3 

/ TIMEse! MEMsaMEM : 

ASSIGN § DUMMY DEVICE sDCON » CONTROL /MESSAGE 
/ASSIGN 6 SC DEVICEssDLST FILEssFLST BUFFERS#=1 p LISTING 

/ASSIGN 7 MT{ — DEVICEssDOUT FILEssFOUT BUFFERSs2 » OUTPUT 

/ASSIGN 8 DISC1 DEVICEssDIN FILEs(SYSTEM,LPF) FILEseFINS «. INPUT 


( BUFFERS#2 
“END 
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0% CREATE DXCoPY,COMMENT, "GENERAL PURPOSE COPY " 

/REPLACE DxCoPpy e GENERAL PURPOSE COPY . 

CEXEC OBJe(1,SYSTEM,DXCOPY) MEM=(39@,3780,2000) PRTY=(1,15)3 

/ TIMEse{ MEMSSMEM PRIYsePRI TIMEssTIM 

/ASSIGN 5 DUMMY DEVICEssDCON p CONTROL /MESSAGE 
/ASSIGN 6 DUMMY DEVICESeDLST FILEssFLsT BUFFERS#! . LISTING 

ASSIGN 7 DISC1 DEVICEseD0UT FILEssFOUT REPLACE s8ROUT} 

/ BUFFERS#2 BUFFERS: *BOuT LINKSEGreLIN RELRECr#REL? 

/ INDEXEDSSIND ACCESS#(ANY,ANY,ANY,ANY) ACCESS#sCOUTs 

/ ALLOCATE#(1,0,128,19) ALLOCATE: sLOUT KEYLENS63 

/ KEYLENSsKOUT LRECL#864 LRECLssGOUT » OUTPUT 

ZASSIGN 8 DISC! DEVICEssDIN FILEseFIN DELETEssTIN BUFFERS#1 . INPUT 

7END 

o# CREATE DXLINK, COMMENT, "LINK Dx980 OPERATING SYSTEM * 

/REPLACE OXLINK « LINK 0X98@ OPERATING SYSTEM , 

/EXEC OBJs(1,SYSTEM,DXOLE) MEM#(309,31508,8000) PRYY#(1,2)3 

/ TIMEsel . 

/ASSIGN § DUMMY DEVICEssDLP! FILEssFLPi BUFFERSs2 - ALY 1 OBJECT IN 
/ASSIGN 2 DISC1 DEVICEteDLP2 FILEs(SYSTEM,DXLPF) FILEssFLP23 

/ _ BUFFERS#2 - ALT 2 OBJECT IN 
/ASSIGN 3 DUMMY DEVICESsDLPS FILEssFLP3 BUFFERS#2 - ALT 3 OBJECT IN 
/ASSIGN 5S DISC1 DEVICEs@DIN FILEs(USER@1,LINKDX) FILES sFIN3. 

/ BUFFERS#1 » PRIMARY INPUT/CON 
/ASSIGN 6 8¢ OEVICEssDLST FILE:eFLST BUFFERS#1 - LOADMAP LIST/ERR 
/ASSIGN 8 DISC1 DEVICEssDLM FILEs(USERG1,0XMIP) FILE:eFLM) 

/ REPLACE:#RLM BUFFERS®¢ RELRECS 

/ ACCESS# (ANY, ANYSANYs ANY) 3 


' 


/ ALLOCATE#(32,247,32,32) ALLOCATEssLL™ LRECL #64 « LOAD MND OUTPUT 
/ASSIGN 9 OISC!1 DEVICEssDLIB FILEs(SYSTEM,USRPLX) FILE:sFLIB; 

/ _ BUFFERS#2 ' - LIBRARY FILE 
/ASSIGN 1@ DISC1 FILE®(TEMP,SCRL) NEW BUFFERS#1 LINKSEQ? : 

/ ACCESSS(ANY,ANYSANYSANY) ALLOCATE®(16,300,256-80) . LINKSEQ SCRATCH 
ASSIGN 12 DISC1 DEVICESsDEXT FILEs(USERB1,0XEXTD) FILE sFEXT? 

/ REPLACE: #REXT BUFFERSa1 LINKSEQ} 


/ ACCESS8(ANY,ANYsANYSANY) ACCESS38CEXT? . 

/ . ALLOCATE®(1,0,12801) ; . SYS EXT DEFS FILE 
/ASSIGN 13 DISC! FILES(TEMP,SCRR) NEW BUFFERS#1 RELREC; 

/ ACCESS®(ANY,ANYsANYSANY) ALLOCATES(2,308,128,2)3 | 

/ LRECLsi99¢ - RELREC SCRATCH 
“ENO 

/REPLACE OXOLE =. LINK EDITOR | 


/EXEC OBJe(1,SYSTEM,OXOLE) MEM@(389,12808.2000) PRTY#(1.15)3 


/ . TIMEse] MEMSeMEM PRTY3@PRI TIMEssTIM. ote . 

/ASSTGN 3 DUMMY DEVICEseD0B! FILEsF081 BUFFERS=2 e ALY 1 OBJECT IN 

ASSIGN 2 DUMMY DEVICEss00B2 FILEssFOB2 BUFFERSs2 pe ALT 2 OBJECT_IN 

ASSIGN S DISC1 DEVICEreDIN FILEssFIN B8UFFERS#! ¢ PRIMARY INPUT/CON 

/ASSIGN 6 SC DEVICEssDLST p LOADMAP LIST/ERR 

/ASSTGN 7 DUMMY DEVICEssD08J FIL@ssFOBJ BUFFERS#1 - COMPACT OBS OUT 

ASSIGN 8 DISC! DEVICEss0LM FILEssFLM REPLACES ®RLMs 

/ BUFFERSe1 RELREC ACCESSs(ANY,CREAT.CREATANY)3 

/. ACCESSteCLM ALLOCATE®(1,6,32,1) ALLOCATES sLLMs rae eed 

/ LRECLs64 a - LOAD MOD OUTPUT 

ASSIGN 9 DISC} FILES(SYSTEM,USRFTN) DEVICEs=DLI83 a re eee 
FILEssPLIB8 BUFFERSs2 - LIBRARY FILE 


/ < , 

/ASSIGN 3@ DISC! FILES(TEMP,SCRL) NEW BUFFERS@1 LINKSEQ, ae xe 

/ _ ACCESS#(ANY,ANY,ANY*ANY) ALLOCATES (19,300,286,30) p LINKSEQ SCRATCH. 
/ASSTGN 11 DISC1 FILESCSYSTEM,DXEXTD) FILEssFEXT BUFFERS#1 - SYS ExT OEFS OPT 
/ASSTGN 43 DISC! PILES(TEMP,SCRR) NEW BUFFERS#1 RELRECs 


/ ACCESS= (ANY, ANY, ANY ANY) ALLOCATE®(19,388,128,18)3, eae 
ce ‘ LRECLeig¢0 - RELREC SCRATCH 
7EN 


TTT 
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»# CREATE DXOLEP,COMMENT,*LINK PLEXUS PROGRAMS " 


/REPLACE DXOLEP 


« LINK PLEXUS PROGRAMS . 


JEXEC OBJs(1,SYSTEM,OXOLE) MEM8(389,32800,.3800) PRTY=(1,2)3 


/ 

/ASSIGN 
/ 

/ ASSIGN 
/ASSIGN 
/ASSIGN 
/ ASSIGN 
/ASSIGN 


ra 
/ 


/ 


/ 
/ASSIGN 
/ ASSIGN 
/ 

/ ASSIGN 
/ ASSIGN 
/ 

/ 

/END 


_ TIMEsel MEMSsMEM PRTYssPRI TIMEs#TIM 
1 OUMMY DEVICEssD0B1 FILEs(USERA1,ASMOUT) FILEs#FOB13 
BUFFERS#2 » ALT 1 OBJECT IN 
2 DUMMY DEVICEs#D0B82 FILEssFOB2 BUFFERS#2 ~ ALT 2 OBJECT IN 
5 DISC{ DEVICEseDIN FILEssFIN BUFFERS#1 - PRIMARY INPUT/CON 
6 SC DEVICErsOLST FILEs#FLST BUFFERS#1 . LOADMAP ILIST/ERR 
7 DUMMY DEVICE:sD0BJ FILEssFOBJ BUFFERS#1 ~ COMPACT OBS OUT 
8 DISC! DEVICEssDLM FILEssFLM REPLACES ®RLM3 
BUFFERS]ed RELREC ACCESS=(aNy-CREAT-CREATsANY)3 
ACCESS38CLM ALLOCATE®(1,6,32,1) ALLOCATES #LLM3 
LRECL 864 ~ LOAD MOD OUTPUT 
9 DISC! FILES(SYSTEM/USRPLX) FILE:sFLIB BUFFERSs2 ~~ LIBRARY FILE 
10 DISCi FILE#(TEMP.SCRL) NEW BUFFERSs1 LINKSEQS 
_ ACCESS®(ANY,ANY*ANYSANY) ALLOCATE®(16,380,256,38) . LINKSEA SCRATCH 
11 O18C1 FILE®(SYSTEM,DXEXTD) FILESsFEXT BUFFERS#1 . SYS EXT DEFS OPT 
13 DISC1 FILE=(TEMP,SCRR) NEW BUFFERS#1 RELREC3 
ACCESSS(ANYsANYsANYeANY) ALLOCATES (10,304,128,10)), 
LRECL #100 | . RELREC SCRATCH 


.# CREATE FILMGR,COMMENT, "FILE CREATE/DELETE CAPABILIY® 


/REPLACE FILMGR 


FILE CREATE/OELETE CAPABILITY . 


/JEXEC OBJs(1,SYSTEMs,OXCOPY) MEM®(390,2650,850) PRTY™(1,15)5 


/ 
/ASSIGN 
/ 
/ 
/ 


/ 
/ASSIGN 
/ ASSIGN 
/ ASSIGN 
/ ASSIGN 
7END 


— TIMEsel PRTYs=sPRI TIMEssTIM 
1 DISC1 DEVICErsDISC FILEssFILE NEWs=#NEW REPLACES sREP3 
DELETE12DEL BUFFERS#1 LINKSEQSSLIN RELRECs#REL’ . FILE TO BE 


INDEXEDS8IND ACCESS@CANYsANY,ANYCANY) ACCESS:#ACC3. CREATED/DELETED 


ALLOCATES ALL KEYLEN®6 KEYLENSSKEY LRECL#643 
LRECL1SLRE 

DUMMY 

DUMMY 

DUMMY 

DUMMY 


Ona oO 


»# CREATE FTNGO ,COMMENT, "EXECUTE FORTRAN GENERATED LM" 


/REPLACE FYNGO 


. EXECUTE FORTRAN GENERATED LOAD MODULE . 


/EXEC OBJs(1,USER@L1,G0) MEM#(388,12000,1008) PRTYs(1,15)3 


/ 
/ ASSIGN 


JASSTEN 


yrwwew'* 


/ ASSIGN 
/ ASSIGN 


/ASSTGN 


/ ASSIGN 
/ ASSIGN 
/ 

/ 

7END 


TIMEsi@@ OBJss0BJ MEMtaMEM PRTYtsPRI TIMEssTIM 


aAargaed 


ILE 


@ sc DEVICE sDMSG » SYSTEM MESSAGE 
289 SC LUNOSSLUN@ DEVICE sDEVO - USER PROG LUN 
2BL DUMMY LUNOssLUNI DEVICESsDEVi . USER PROG LUN 
2B4 DUMMY LUNOSSLUN4 DEVICESsDEV4 FILESsFIL4 BUFFERS#2.,USER PROG LUN 
2B5: SC LUNOS®LUNS DEVICESsDEVS FILES#FILS BUFFERS#2,USER PROG LUN 
2B6 SC __— LUNOSBLUNG DEVICES 2DEV6 FILESsFIL6 BUFFERS#2.,USER PROG LUN 
oB8 DISCi LUNOSSLUNS FILE®(TEMP,SCRL) NEW BUFFERS#3} 

LINKSEG ACCESS®CANYs ANY, ANYSANY) 
ALLOCATE#(1,308,32, 10) . USER SCRATCH F 
ee ae ee ee eee re ne ee 
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o# CREATE FINLGO,COMMENT, "FORTRAN COMPILE, LINK,AND GO* 


/REPLACE FY 


NLGO 


« FORTRAN COMPILE, LINK, AND GO , 


/JEXEC OBgs(1,SYSTEM.FIN) MEM#(309,19009,1090) PRTYS(1,15)) 


/ 


/ASSIGN @ DUMMY DEVICESs0MSG SHARE 

§ DISCi DEVICEtsD0SRC FILEssFSRC BUFFERS8! 

SC DEVICEssDLST1i FILEssFLST BUFFERS#1 
pooner 7 DISC1 FILES(TEMP,PHASE1) NEW BUFFERS#!1 LINKSEQSs 


/ASSIGN 
/ASSIGN 6 


/ 
/ASSIGN @ 
/ASSIGN 6 
/ASSIGN 7 
/ 
/ASSIGN 8 


/ 
“ASSIGN 5 
/ASSIGN 6 
/ASSIGN 8 
/ 
/ 
“ASSIGN 9 
/ASSIGN 18 
/ASSIGN 13 
4 


TIMEsel, MEMS SMEMC 


“e * ¥ 


ACCESS8(ANY,ANYsANYSANY) ALLOCATES (10,380,64,39) . 
VEXEC ORJs(1,SYSTEM,FINPS2) MEM=(390,8000,1000) PRTY#(1.15)3 


TIMEsel MEM3sMEMC 
DUMMY 
SC DEVICE: sDLST2 


DISC1 FILEs(TEMP,OBJECT) NEW BUFFERSs! LINKSEQ? 


ACCESS (ANY,ANY,ANYSANY) ALLOCATE#(10,300,64,10) 


DISC! FILEs(TEMP,PHASEL) BUFFERS#1 
/EXEC OBJs(1,SYSTEM,DXOLE) MEM#(30¢,12908,3000) PRTY#(1,15)3 


TIMEse] MEMS SMEML 


DISC1 FILES(TEMP,OBJECT) DELETE BUFFERS#1 i 
SC DEVICES#OLSTL FILEssFLST BUFFERS#! ‘ 
DISC1 FILES(TEMP,L™) NEW BUFFERS#1 RELREC3 
ACCESS®(ANY,ANY,ANY/ANY) ALLOCATE ®(10,308,32,19)) . 


LRECL&64 


DISC! FILES(SYSTEM,/USRFIN) BUFFERS#2 
DISC! FILES(TEMP,PHASE1) DELETE BUFFERSS1 

DISC! FILES(TEMP,SCRR) NEW DELETE BUFFERS®#1 RELRECS 
ACCESS#(ANY,ANY,/ANY,ANY) ALLOCATES (10,304,128,10)5. 


LRECL#10@ 


/ 
ZEXEC OBJs(1,TEMP,LM) MEM#(300,8900,1008) PRTY#(1,15)3 
TIMES109 MEMteMEMG TIMEseTInG 


/ 

/ ASSIGN " 
/ASSIGN >B@ 
/ASSIGN BI 
/ASSIGN 2B5 
/ASSIGN »B6 
/ASSIGN >-B8 
/ 

END 


sc DEVICE: sDMSG 
sc DEVICE: sDEV@ 
DUMMY DEVICE: sDEV1 


sc DEVICEssDEVS FILEssFIL5 BUFFERS#2 
Sc DEVICEssDEV6 FILEssFIL6 BUFFERSS2 


es 3 3. * 


.* 


DISC1 FILES(TEMP,SCRL) NEW BUFFERS#®1 LINKSEQS ; 
ACCESSS(ANY,ANY.ANYsANY) ALLOCATE®(10,388.32,18) . 


o# CREATE FTNLNK,COMMENT, "FORTRAN COMPILE AND LINK " 


/REPLACE FT 


NLNK 


e FORTRAN COMPILE AND LINK . 


EXEC OBJs(1,SYSTEM.FIN) MEM#(329,10908,1080) PRTYY#(1.,15)3 


/ 


/ASSIGN @ DUMMY DEVICE?sDMSG SHARE 


/ASSIGN 6 


TIMEsel, MEM: eMEMC 


SC DEVICEssDLST1 FILEsaFLST BUFFERS®1 
/ASSIGN 7 DISC1 FILES(TEMP,PHASE1) NEW BUFFERS#1 LINKSEGS 


/ASSIGN § DISC1 DEVICEssDSRC FILEr=FSRC BUFFERS#! ; 


/ 

ASSIGN 86 
/ASSIGN 6 
/ ASSIGN 
/ 


/ ACCESSS(CANY,ANY,ANYsANY) ALLOCATE#(10,308,64,30) 
/EXEC OBJs(1,SYSTEM,FINPS2) MEM#(390,8960,1800) PRTY#(1,15)3 


TIMEse1 MEM: sMEMC 
DUMMY 


Sc DEVICEssDLST2 

7 DISC! FILESC(TEMP,OBJECT) NEW BUFFERS*#!{ LINKSEQ?s 
ACCESS®(ANY,ANY/ANYsANY) ALLOCATES(10,500,64,10) 
/ASSIGN 8 DISC1 FILESC(TEMP,PHASE1) BUFFERS#1 


EXEC OBJs(1,SYSTEM,OXOLE) MEM8(30@,12908,3008) PRTY=(1,15)3 


/ 

/ASSIGN 5 
/ASS[GN 6 
/ASSIGN 8 
/ 

/ 

/ 

/ASSIGN 9 
/ASSIGN 18 
/ASSIGN 13 
/ 

/ 

7END 


TIMEsel MEMS sMEML 


DISC! FILEs(TEMP,OBJECT) DELETE BUFFERS#1 p 


SC DEVICESsO0LSTL FILEssPLST BUFFERS#1 


DISC} DEVICE:s0LM FILEs(USER@1.,G0) FILESsFLM) 
REPLACEssRLM BUFFERS#3 RELREC3 


ACCESS#(ANY,ANYsANYeANY) ACCESS3SCLM3 
ALLOCAYTE2(18,0,32,18) ALLOCATEgsLLM LRECL#64 , 


* 


OISci FILE#(SYSTEM,USRFIN) BUFFERS#2 , 
OISCi1 FILEs(TEMP,PHASE1) DELETE BUFFERS#1% 

OISc) FILESC(TEMP,SCRR) NEW DELETE BUFFERS=1 RELREC} 
ACCESS#(ANY,ANYsANYSANY) ALLOCATES (18,3880,128,18)3. 


LRECL81068 


SYSTEM MESSAGE 
SOURCE INPUT 
SOURCE [.IST/FRROR 
INTERMED ORJECT 
SOURCE SCRATCH 


SYSTEM MESSAGE 
ERROR MESSAGE 


- OBJECT OUTPUT 


INTERMED OBJECT 


PRIMARY INPUT/CON 
LOADMAP I.IST/ERR 


LOAD “OD OUTPUT 


LIBRARY 
LINKSEQ SCRATCH 


RELREC SCRATCH 


SYSTEM MESSAGE 
USER LUN @ 

USER LUN 1 

USER LUN Sa INPUT 
USER LUN 68Q0UTPUT 


USER SCRATCH FILE 


SYSTEM MESSAGE 
SOURCE INPUT 
SOURCE LIST/ERROR 
INTERMED OBJECT 
SOURCE SCRATCH 


SYSTEM MESSAGE 
ERROR MESSAGE 


- OBJECT OUTPUT 
- INTERMED OBJECT 


PRIMARY INPUT/CON 


- LOADMAP L.IST/ERR 


LOAD MOD OUTPUT 
LIBRARY 
LINKSEQ SCRATCH 


RELREC SCRATCH 


SS SS eS 
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-# CREATE FINPS1,COMMENT,"FORTRAN PHASE 1 COMPILE " 
/REPLACE FINPS1 . FORTRAN PHASE i COMPILE . 
/EXEC OBJa(1,SYSTEM-FIN) MEM#(38g,8089,1060) PRTY#(1,15)% 
/ TIMEse! MEM32MEM PRTYsgsPRI TIMESsTIM ; 
ZASSIGN @ DUMMY DEVICES2DMSG SHARE - SYSTEM MESSAGE 
/JASSIGN 5 OISC1 DEVICE:sDSRC FILEssFSRC BUFFERS81 2 SOURCE INPUT 
/ASSIGN 6 SC DEVICErsDLST FILE: sFLST SHARES#SLST AUFFERS#1.S0URCE |.IST/ERROR 
/ASSIGN 7 DISC1 DEVICE:sDINT FILEg:sFINT BUFFERSs!i LINKSES; ~ 
/ ACCESS®(ANY,ANY*ANYSANY) ALLOCATE®(1.0,64,30)3 . SOURCE SCRATCH 
/ NEWssNINT REPLACESSRINT ACCESStaCINT ALLOCATES 8LINT 
END 
»# CREATE FINPS2,COMMENT, "FORTRAN PHASE 2 COMPILE " 
7 REPLACE FINPS2 . FORTRAN PHASE 2 COMPILE . 
/EXEC OBJs(1,SYSTEM,FINPS2) MEM®(390,8900,1000) PRTY=(1,15)3 
/ TIMEs={ MEMisMEM PRTY:sPRY TIMES STIM 
/ASSIGN @ DUMMY DEVICE:sDMSG SHARE ". SYSTEM MESSAGE 


/ASSIGN 6 SC DEVICEte0LST FILE:sFLST SHARE? sSLST RUFFERS#1,ERROR MMSSG85 
/ASSIGN 7 DISC1 DEVICE:sD0BJ FILEssFORJ BUFFERSs1 LINKSEO} 
/ 


ACCESS® (ANY, ANYSANYSANY) ALLOCATE®(1,8,64510)3 . OBJECT OUTPUT 
/ NEWssNOBJ REPLACEssROBJ ACCESS: sCOBJ ALLOCATE: *LOBJ 
/ASSIGN 8 DOISC1 DEVICESsDINT FILFs2FINT BUFFERS#1 . INTERMED ORJECT 
7END 
.# CREATE HELP ,COMMENT, “HeE=L=P OPERATOR i) 
7REPLACE HELP ~ HeEeLeP OPERATOR . 
/JEXEC OBJe(1,SYSTEM/OXCOPY) MEM®(300,3720.1500) PRTY#(1,15)3 
/ TIMEse1 MEMSsMEM PRTyetsePRI TIMESsTIM 
/ASSIGN 5 DUMMY » CONTROL/MESSAGE 
/ASSIGN 6 SC DEVICE?sDLST » LISTING 
/ASSIGN 7 DUMMY » OUTPUT 
/ASSIGN 8 DISC1 FILES(SYSTEM,HELP) BUFFERS#1 . INPUT 
/END 
»# CREATE INITSP,COMMENT, "INITIAL BATCH OUT SPOOL FILE* 
/REPLACE INITSP . INITIALIZE BaTCH GUTPUY SPOOLER FILE . 
/JEXEC OBJs(1,SYSTEMSINITSP) MEM®(300,500,7008) PRTYS(1.5)3 
/ TIMEsel PRTYtsPRI 
/ASSIGN 6 DISCi1 DEVICE##DS0Q FILEs(SYSTEM,S0Q) REPLACE? 
/ BUFFERS#1 RELREC ACCESSs(CREAT.CREAT/CREAT.CREAT) 3. 
/ ALLOCATE#(1,0,32,1) LRECL #64 . 300 FILE 
7END 
.# CREATE IPLINK,COMMENT,"LINK IPL PROGRAM " 
/REPLACE IPLINK .» LINK IPL PROGRAM . 


/EXEC ORJa(1-SYSTEMsDXOLE) MEMs(300,15@00,6000) PRTY#(1,2)3 
/ _ TIMEsel MEMs=sMEM 
/ASSIGN 4 DISC1 DEVICEssDIPL FILEs(SYSTEM,DOXLPF) FILEssFIPLs. 


/ BUFFERS23 BUFFERS: #BIpL » IPL OBJECT IN 


/ASSIGN § DISC1 DEVICE:sDIN FILEssFIN B8UFFERS#1! » PRIMARY INPUT/CON 
/ASSIGN 6 SC DEVICE: sDLST FILEssFLST BUFFERS#! . LOADMAP LIST/ERR 
/ASSIGN 8 DISC{ DEVICEssDLM FILEs(USER@1,I1PL) FILESeFLM? 

/ REPLACES#RLM BUFFERS®4 RELREC3 

/ ACCESS®(ANY,ANYANYeANY) ACCESSE®CLM3 ; 

/ ALLOCATE®#(6,0,32,6) ALLOCATESSLLM LRECL864 IPL LOAD MOD OUT 
/ASSIGN 9 DISCi DEVICEts0LIB FILEs(SYSTEM,USRPLX) FILES =FLIB} 

/ BUFFERS82 . LIBRARY FILE 
/ASSIGN 10 DISC1 FILES(TEMP,SCRL) NEW BUFFERS#1 LINKSEQ) ; 

/ _ ACCESS®CANY,ANYsANYeANY) ALLOCATE®(18,388,256,18) . LINKSEG SCRATCH 
/ASSIGN 1] OUMMY ; 

/ASSIGN 12 DUMMY . SYS EXT DEFS OPT 
ASSIGN 13 DISC{ FILE®(TEMP,SCRR) NEW BUFFERS#! RELREC? 

/ ACCESS@ (ANY, ANYsANYSANY) ALLOCATES (2.308-128-2)3 | 

/ LRECLs102 . RELREC SCRATCH 
7END 


ip a SS SSS 8 8S SS SS 
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o# CREATE ITS ,COMMENT, "INTERACTIVE TERMINAL SUBSYS ” 


/REPLACE ITS « INTERACTIVE TERMINAL SUBSYSTEM . 

/EXEC OBJs(1,SYSTEM-ITS) MEM#(300,8080,2000) PRTY®(2,51)3 

/ _ PRIV TIMES@1 OBJ:s0BJ MEMSSMEM PRTYtsPRI PROTSSPRO, 

/ASSIGN 14 DUMMY DEVICESsT1 SHARE: S31 > TERMINAL 1 
/ASSIGN 3 DUMMY DEVICEssT2 SHARE:#82 - TERMINAL, 2 
JASSIGN 5 DUMMY DEVICE8sT3 SHARE: #83 - TERMINAI 3 
7ASSIGN 7 DUMMY DEVICEssT4 SHARE:#3S4 > TERMINAL, 4 
/ASSIGN 9 DUMMY DEVICEs®T5 SHARE3s#S5 - TERMINAL, § 
/ASSIGN 11 DUMMY DEVICES#T6 SHARE s#S6 - TERMINAL. 6 
/ASSIGN 13 DUMMY DEVICE3sT7 » TERMINAL 7 
/ASSIGN 15 DUMMY DEVICEr#T8 - TERMINAL 8 
/ASSIGN 17 DUMMY DEVICE:8T9 > TERMINAL 9 
/ASSIGN 19 DUMMY DEVICEssT12 . TERMINAL, 10 
7END 

e# CREATE JCL ,»COMMENT, "CREATE Jct PROCEDURE " 

/REPLACE JCL » CREATE JCL PROCEDURE ,. 

ZEXEC OBJs(1,SYSTEM,JCLTRN) MEM®(398,7558.,1000) PRTYS(1,15)3 

/ _ TIMEsel MEMssMEM PRTYs#PRI 

ASSIGN 1 SC DEVICE:sDSRC FILEssFSRC BUFFERS#! - SOURCE INPUT 
/ASSIGN 2 SC DEVICErsDERR SHARE? sSERR 2 ERROR MESSAGE 
/ASSIGN 3 SC DEVICE:sDLST FILE:=FLST SHARE? sSLST BUFFERS#1.SOURCE I.ISTING 
ASSIGN 4 DISC} DEVICE:sDOBJ FILEs(SYSTEM,SJCBFLsAB)s 

/ FILE:sFOBJ REPLACEssRoBJ BUFFERS#2 INDEXED? 

/ ACCESSS(ANY,ANY*/ANY2ANY) ACCESS28COBJ3 ; 

/ ALLOCATES (1,0,96.28) ALLOCATE: #LOBJ KEYLENs6 . OBJECT OUT FILE 
END 

# CREATE JCLUP ,COMMENT,"UPDATE Jcl SOURCE AND BINARY" 

/REPLACE JCLUP . UPDATE JCL SOURCE AND BINARY FILES . 

/EXEC OBJs(1,SYSTEM,JCLTRN) MEM®(300,7550,1000) PRTY=(1,15)3 

/ TIMEset MEM3 sMEM : ; 

/ ASSIGN 1 DISCi FILES(SYSTEM,JCWORK) BUFFERS#! - SOURCE INPUT 
/ASSIGN 2 SC DEVICEssDERR > ERROR MESSAGE 
/ASSIGN 3 SC _ DEVICEssOLST .« SOURCE L.ISTING 
/ASSIGN 4 DISC! DEVICESs00B8J FILE=s(SYSTEM,SJCBFL,AB)3 

/ FILE:sFOBJ REPLACEs*ROBJ BUFFERS#s2 INDEXED? 

/ ACCESS®(ANY,ANYSANYSANY) ACCESS3 8COBJ? 


/ ALLOCATES (1,8.96,32) ALLOCATEssLOBJ KEYLENS6 . OBJECT OUT FILE 
/EXEC OBJ#(1,SYSTEM,SMR) MEM®(309,11506,2008) PRTYS(1.,15)3 


/ TIMEs=1 MEMS SMEM : 
ZASSIGN 8 DUMMY p ERROR/USER MSG 
/ASSIGN 4 DISCL FILEs(SYSTEM-JCLCUP) DELETE BUFFERS#1 - CONTROL 

/ASSIGN _6 DUMMY : , LISTING 

ASSIGN o15 DISCS FILES(SYSTEM,JCLSRC) BUFFERSS#! p OLD LIBRARY FILE 
/ASSIGN 222 DUMMY - COMPILE OUT FILE 
ASSIGN 225 DISC1 FILESCTEMP, JCLFIL) NEW LINKSEQ BUFFERS#15 

/ ACCESS®CANY,ANYSANYsANY) ALLOCATES (7,380,256,58) , NEW LIBRARY FILE 
/ASSIGN 226 DUMMY | ‘ , JCL UPDAT CON OUT. 
7ASSIGN 235 DISC1 FILE# (SYSTEM, JCWORK) BUFFERS#1 - INCLUDE 

ZEXEC OBJe(t,SYSTEM,SMR) MEM=(S0G.11508,2088) PRTYS(1.15)5 

4 TIMEs=i MEMZsMEM 

/ASSIGN 8 DUMMY , ERROR/USER MSG 
7ASSIGN = 4 DUMMY » CONTROL 

/ASSIGN _6 DUMMY » LISTING 

/ASSIGN 215 DISC1 FILESC(TEMP,JCLFIL) BUFFERS#1 p OLD LIBRARY FILE 
ASSIGN 222 DUMMY x , COMPILE OUT FILE 
/ASSIGN 225 OISC1 FILES(SYSTEM,JCLSRC) BUFFERS#1 , NEW LIBRARY FILE 
/ASSIGN 226 DUMMY - JCL UPDAT CON OUT 


“END 


senna, ately a 
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.# CREATE LIBBLO,COMMENT, "BUILD LIBRARY FILE " 


/REPLACE LIBBLD 
/EXEC OBJa(1,SYSTEMsLIBBLD) MEM®(396,2000,1000) PRTY=(1,15)3 


/ 


ASSIGN 5 MT 
/ASSIGN 6 SC 


« BUILO LIBRaRy FILE . 


TIMEsel MEMtsMEM PRTYsspRI TIMEssTIM 
DEVICEr#D0OBJ FILEssFOBJ BUFFERSs! - OBJECT INPUT 
DEVICErsDLST FILEssFLST SHAREssSLST BUFFERS#1.IDT/DEF LISTING 


/ASSIGN 9 DISC1 DEVICEssDLIB FILE:sFLI8 REPLACEs#RLIRB3 


/ 
/ 
/ 
ZEND 


BUFFERSs2 INDEXED ACCESS#(ANYs ANY, ANY,ANY)3 
ACCESS2sCLIB ALLOCATEs(1,07128,20) ALLOCATE: sLLIB? 


KEYLEN®8 - OUTPUT 1.IB FILE 


o# CREATE LINKUP,COMMENT, "LINK MOD AND UPDATE L M FILE* 


/REPLACE LINKUP 


» LINK MODULE AND UPDATE LOAD MODULE FILE . 


/EXEC OBJs(1,SYSTEM,/DXOLE) MEM#(309,12098.3000) PRTY#(1,1)3 


/ 

/ ASSIGN 
/ ASSIGN 
/ ASSIGN 
7 ASSIGN 
/ 

/ ASSIGN 


/ 
/ASSIGN 
/ 
/ 
/ASSIGN 


/ 
/ ASSIGN 
/ 


/ 
VEXEC OBJe(1, SYSTEM,LMUPDT) MENA SEA s "OPPS SRO) relyetes) 
/ 


A A be 


9 


18 


11 
13 


TIMEsel MEM SMEML 


DUMMY DEVICEs#D0BJ FILE:=F0RJ BUFFERS=2 + SECONDARY oBJ IN 
DISC1 DEVICErsDIN FILErsFIN BUFFERS#1 ~ PRIMARY INPUT/CON 
SC DEVICEssDLST FILEssFL8T BUFFERS=1 " LOADMAP LLIST/ERR 


DISCi FILEs(TEMP.LM) NEW BUFFERS#1 RELREC LRECL#643 


ACCESSBCANYsANYSANYSANY) ALLOCATES (10,388,32,18) . LOAD MND OUTPUT 


DISCi1 DEVICE:sDPLX FILEs(SYSTEM,USRPLX) FILE:sFPLXs 
BUFFERS#2 .. PLEXUS |.IBRARY 
DISC1 FILES (TEMP.SCRL) NEW DELETE BUFFERS#=13 ; 
LINKSEQ ACCESSS(ANY,ANY,ANY,ANY) 3 . LINKSEQ SCRATCH 


ALLOCATE#(10,300,256,30) 
DISC! DEVICEs=DEXT FILEs(SYSTEM,DXEXTD) FILESsFEXTS 
BUFFERSs{ . SYSTEM EXT DEFS 
DISC! FILESC(TEMP,SCRR) NEW DELETE BUFFERS#1 RELREC3 
ACCESS®CANY/ANY/ANY/ ANY) ALLOCATE#(10,300,128,10)3 


LRECL #100 « RELREC SCRATCH 


TIMEse1 MEM3sMEMU 


fASSIGN 4 SC DEVICE @sONSG 2 SYSTEM MESSAGE 
ASSIGN § SC DEVICE?sDCON SHARE? sSCON « CONTROL INPUT 
/ASSIGN 6 DISC1 FILESC(TEMP,LM) QUFFERS#1 - LOAD MODULE INPUT 
/ASSIGN 7 DISCi DEVICE&sDUPD FILEssFUPD BUFFERS#{ - UPDATE FILE 


/END 


o# CREATE LMUPDT,COMMENT, "LOAD MODULE UPDATE 
/REPLACE LMUPDT 


e LOAD MODULE UPDATE . 


ZEXEC OBJs(LeSYSTEM/LMUPDT) MEM8(390,5980,500) PRTY2#(3,1)3 


/ 

/ASSTEN 
/ASSIGN 
/ASSTGN 
/ ASSIGN 


/END 


4 
bs) 
6 
7 


TIMEse] MEMSSMEM PRTYse2PRI TIMEssTIM 
sc DEVICE? sNMSG 


$C _ DEVICEssDCON 


SYSTEM MESSAGE 
CONTROL INPUT 
LOAD MOOULE INPUT 


UPDATE FILE 


DEVICESsDCON FILEssFCON BUFFERS! 
DISC] DEVICErsDL™ FILEteFLM BUFFERS#1 
DISci DEVICEssNUPD FILEssFUPD BUFFERS#1 


ot % YD 


a# CREATE LPFBLO,COMMENT, "UPDATE LINKABLE PARTS FILE * 


/REPLACE LPFOLD 


« UPDATE LINKABLE PARTS FILE , 


pn OBJe(1, SYSTEM,LPFBLD) MEMa(3#@,5308,1988) PRTYa(1,2)3 


7 ASSIGN 
/ASSIGN 
/ 


/ASSIGN. 


/ASSTGN 
/ 


4 
/ASSTGN 


/END 


Change 1 


TIMEse! O8J280BJ MEMEONEM 
@ DUMMY DEVICES eDCON 
S DISCL DEVICES aDOBJ FILES(USER@1,ASMOUT) PILES=POBJs 
BUFFERSsi » OBJECT INPUT 
6 sc DEVICESsO0L8T « LISTING 
7 DUMMY DEVICES SOEXT FILESaFEXT REPLACES @REXT). 
BUFFERS#{ LINKSEG ACCESS@(ANY,CREAT,CREAT, CREAT) ) 
ACCESSIaCEXT ALLOCATES(1,8,128,28) ALLOCATES@LEXY , EXTRACT FILE 
9 DISCS DEVICESsOUPD FILESSFUPD REPLACEReRUPD; 
BUFFERSe2 INDEXED ACCESS= (CREAT, CREAT,CREAT,CREAT)} 
ACCESSISCUPD ALLOCATE®(1,0,256,10) ALLOCATE! sLUPO? 
KEYLENS6 , UPDATE FILE 


CONTROL 
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o# CREATE LSTEOT,COMMENT, "LYST EpIT FILE . 

/REPLACE LSTEOT e LIST EDIT FILE . 

/EXEC OBJs(1,SYSTEM,LSTEDT) MEM®(3@0,1780,650) PRYY#(1,15)} 

/ _ TIMEssl MEMS@MEM PRTYs@PRI TIMEssTIM 

ASSIGN 18 SC _—~ DEVICE: s0LST . : - SOURCE OUTPUT 
yer 26 DISCi1 DEVICEssDIN FILEssFIN BUFFERS#! ~ SOURCE INPUT FILE 
/END 

o# CREATE PIALGO,COMMENT, "PLEXUS COMPsILT.ASMeLINK,GO * 

/REPLACE PIALGO e PLEXUS COMPILE, ILT. ASSEMBLE, LINK, AND GO , 

/EXEC OBJ=(1,SySTEM,PLEXUS) DENT (AG 79400) 2708) PRTY#(1,2)3 

/ TIME=7200 MEMsaMEM: 

/ASSIGN 8 SC _ DEVICE: sDERR - ERROR MESSAGE 
ASSIGN 5 DISC1 DEVICEss0SRC FILErasFSRC BUFFERS#1 » SOURCE INPUT 
JASSIGN 6 SC DEVICE: sDLSTC - SOURCE L.ISTING 


/ASSIGN 222 DISC1 FILEs(TEMP,DATA) NEW BUFFERS#1 LINKSEQ) : 

/ ACCESS®(ANY,ANYSANYSANY) ALLOCATE®(10,308,160,10). MATA DIV INT CODE 
/ASSIGN 223 DISCi FILEs(TEMP,PROC) NEW BUFFERSs1 LINKSEO} ; 

/ ACCESSBCANY,ANYZANYeANY) ALLOCATE®(16,300.160,10). PROC DIV INT CODE 
/ASSIGN 225 DUMMY 

ZEXEC OBJs(1,SYSTEM,ILT98@) MEM®(390,>94C0,2500) PRTY#(1,2)3 


/ TIMEs720@8 MEMse@MEM 
/ASSIGN @ SC DEVICEs sDERR . ERROR MESSAGE 
/ASSIGN 6 SC DEVICEss0LSTI p PRINTOUT 

/ASSIGN 012 DISC1L FILES(TEMP,DATA) DELETE BUFFERS#1 « DATA OIV INT CODE 
/ASSIGN 213 DISCL FILES(TEMP,PROC) DELETE _BUFFERS®1 « PROC DIV INT CODE 
/ASSIGN 214 DISC1 FILE®C(TEMP,SCRR) NEW BUFFERSS1 RELREC3 

/ ACCESS2(ANYSANYSANY/ANY) ALLOCATE®#(10-300.128,10)3 


4 _ LRECL864 - REL REC SCRATCH 
/ASSIGN 223 DISCi FILESC(TEMP,ILTOUT) NEW BUFFERS#s1 LINKSEQ; 

/ ACCESSB(ANY,ANYSANYeANY) ALLOCATE# (19,309, 128,32), ILY OUTPUT 
/ASSIGN 224 DISC1 FILES(TEMP,SCRR) BUFFERSs1 p REL REC SCRATCH 
/ASSIGN 238 DISC1 FILEs(SYSTEM,MDEF) SHARE BUFFERS#1 - MACHINE DESCRIPT 
/EXEC OBJa(1,SYSTEM,ASMBLR) MEN®(390,29000,2000) PRTY=(1,2)3 
/ TIMEsié6eg 

/ ASSIGN @ DUMMY 

/ ASSIGN 4 DUMMY 

/ ASSIGN S DISC! FILE=(TEMP,ILTOUT) DELETE BUFFERS#i 
/ASSIGN 6 SC ODEVICEssDLSTA 

/ ASSIGN 7 DISCi FILEs(TEMP,OBJECT) NEW BUFFERSs1 LINKSEQ} : 
/ _ ACCESSSC(CANY,ANY.ANYsANY) ALLOCATE® (18,308.128,.28). OBJECT OUTPUT 
ASSIGN 136 DISC1 FILES(TEMP,SCRL) NEW BUFFERS#1 LINKSEQ; 

/ ACCESS=CANY, ANY, ANY ANY) ALLOCATE®(198,388.256, 30). ASSEMBLY SCRATCH 
/EXEC OBJs(1,SVSTEM,OXOLE) MEM8(389,20900,3200) PRTY#(1,2)3 
/ 


SYSTEM MESSAGE 
CONTROL/MESSAGE 
ASSEMBLY INPUT 
ASSEMBLY LISTING 


ose» * 


TIMES1608 | 
JASSIGN 5 DISCi FILEs(TEMP,OBJECT) DELETE BUFFERS®#1 > PRIMARY INPUT/CON 
/ASSIGN 6 SC DEVICEs s0L STL . LOADMAP LIST/ERR 
/ASSIGN 8 OISC1 FILESC(TEMP,LM) NEW BUFFERS#1 RELREC3 
/ ACCESS#(ANY,ANY,ANYsANY) ALLOCATE®(10,308.32,19)) 
/ LRECL#64 LOAD MOD OUTPUT 


LIBRARY 
LINKSE@ SCRATCH 
RELREC SCRATCH 


/ASSIGN _9 DISC1 FILEs(SYSTEM,USRPLX) BUFFERSs2 

/ASSIGN 18 DISCi FILESC(TEMP,SCRL) DELETE BUFFERS®1 

ASSIGN {£3 DISC1 FILES(TEMP,SCRR) DELETE BUFFERS#1 

aGenee OB Je(1,TEMP,LM) MEM= (390, 28088, 5088) PRTYs(1,2)3 
TIMEsi600 

TASSION 8 sc DEVICEssDERR 

/ASSIGN 5 DISsci DEVICEssDIN{ FILEs®FINi BUFFERS#1 

/A8SIGN 6 SC DEVICEssDOUTI! 

/ASSIGN 242 DUMMY DEVICEssDIN2 FILES®FIN2 BUFFERS#1 

/ASSIGN 222 DUMMY DEVICEssDOUT2 FILE:*FOUT2 BUFFERS#1 

/ASSIGN 238 DUMMY DEVICEssOFS FILEs*FFS BUFFERS=1 

/ASSIGN 231 DUMMY DEVICEteDFi FILEs*FF 1 BUFFERSs1 

ZENO 


ov yD * 


ERROR MESSAGE 
PRIMARY INPUT 
PRIMARY OUTPUT 
SECONDARY INPUT 
SECONDARY INPUT 
FILE 8 

FILE 1 


»_‘%. ~*~ “es *e w% * 
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2# CREATE PIALNK,COMMENT, "PLEXUS COMPsILT,ASMsAND LINK? 
/REPLACE PIALNK e PLEXUS COMPILE. ILT. ASSEMBLE, AND LINK . 
/EXEC OBJe(1,SYSTEM,PLEXUS) MEM®(306,>94C0,2708) PRTY#(1,2)3 


/ TIMES7200 MEMs MEM 
/ASSIGN @ SC DEVICE #DERR ". ERROR MESSAGE 
JASSIGN 5 DISCL DEVICErsOSRC FILEr#FSRC BUFFERS#1 » SOURCE INPUT 
JASSIGN 6 SC DEVICErs#DLSTC . SOURCE LISTING 
/ASSIGN 222 DISC1 FILE#(TEMP,DATA) NEW BUFFERS#®1 LINKSEQ) 

/ ACCESS@ (ANY, ANYsANY/ANY) ALLOCATES (18,308,160,18). DATA DIV INT CODE 
ZASSIGN 223 DISC1 FILE#(TEMP,PROC) NEW BUFFERS#1 LINKSEQS 

/ ACCESS® (ANY, ANY, ANY ANY) ALLOCATES (18,308,160,18). PROC DIV INT CODE 
JASSIGN 225 DUMMY 


/EXEC ORJe(L,SYSTEMeILT980) MEM®(390,>94C0,2500) PRTYs(1,2)3 


/ TIME «7208 MEM: sMEM ; 

/ ASSIGN @ SC DEVICE:2DERR - ERROR MESSAGE 

/ ASSIGN 6 SC DEVICEssDLSTI - PRINTOUT 

/ASSIGN 212 DISC FILE*(TEMP,DATA) DELETE BUFFERS®1 » DATA DIV INT CODE 
/ASSIGN 2913 DISCS FILEsC(TEMP,PROC) DELETE BUFFERS#1 - PROC DIV INT CODE 
/ASSIGN 214 DISC1 FILES(TEMP,SCRR) NEW BUFFERS#1 RELREC? 

/ ACCESS#(ANYSANY,ANYS ANY) ALLOCATE®(18,508.128.19)3 

/ LRECL #64 - REL REC SCRATCH 
/ASSIGN 223 DISCi FILESC(TEMP,ILTOUT) NEW BUFFERS#1 LINKSEQ} 

/ ACCESS#(ANY,ANYSANY*ANY) ALLOCATE® (16,300,128, 30). ILT GUTPUT 
/ASSIGN 224 DISCi FILEsC(TEMP,SCRR) BUFFERS#1 « REL REC SCRATCH 


/ASSIGN 230 DISC1 FILES(SYSTEM,MDEF) SHARE BUFFERS#1 - MACHINE DESCRIPT 


/EXEC OBJ2(1,SYSTEM,ASMBLR) MEM8(390,286000,2008) PRTYa(1,2))3 


/ TIMES 1690 . 
/ASSIGN 8 DUMMY > SYSTEM MESSAGE 
/ASSIGN 4 DUMMY > CONTROL/MESSAGE 
JASSIGN § DISCL FILE®(TEMP,ILTOUT) DELETE BUFFERS#1 ~ ASSEMBLY INPUT 
/ASSIGN 6 SC _ DEVICE: sDLSTA » ASSEMBLY LISTING 
/ASSIGN 7 DISCi FILEs(TEMP,OBJECT) NEW BUFFERS#! LINKSEO} 


ACCESSBCANY,ANY,ANYSANY) ALLOCATE®(18,5300.126,20). OBJECT OUTPUT 
DISCL FILEs(TEMP,SCRL) NEW BUFFERS#1 LINKSEQ? 
ACCESSB(ANY,ANYSANY ANY) ALLOCATE®(18,300,256532). 


VEXEC OBJs(1,SYSTEM,DXOLE) MEM#(389,20008,3008) PRTYS(1,2)3 


/ 2 
cree 16 
ASSEMBLY SCRATCH 


/ TIMES1600 
/ASSTGN 5 DISCi FILEs(TEMP,OBJECT) DELETE BUFFERS#} - PRIMARY INPUT/CON 
/ASSIGN 6 SC _ DEVICEssDLSTL . LOAOMAP L.IST/ERR 
/ASSIGN 6 DISC} DEVICESs0LM FILEs¢(USERG1,G0) FILEssFLMs 

/ REPLACEs#RLM BUFFERS®1 RELREC?# 

f ACCESS= (ANY, ANY-ZANY-S ANY) ACCESS eCi Ms 

/ ALLOCATE# (10,8,32,18) ALLOCATES @LLM LRECL864 LOAD MOD OUTPUT 
/ASSIGN 9 DISCL FILEs(SYSTEM,/USRPLX) BUFFERS#2 > LIBRARY 

/ASSIGN {8 DISCS FILES(TEMP,SCRL) DELETE BUFFERS®1 , LINUSEG SCRATCH 
/ASSIGN 13 DISC! FILEs(TEMP,SCRR) DELETE BUFFERS®1 « RELREC SCRATCH 
7END 


e# CREATE PLEXGO,COMMENT, "EXECUTE PLEXUS GENERATED L M* 
/REPLACE PLEXGO » EXECUTE PLEXUS GENERATED LOAD MODULE . 
/EXEC OBJa(1,USERG1,G0) MEMS(308,12000,1006) PRTY#(4,15)3 


/ TIMES1800 OBJ:808J MEMg=smMEmM PRTYt@PRI TIME:STIM ; 

/ASSIGN 8 sc DEVICEssDERR p ERROR MESSAGE 
/ASSIGN 5 DISC1 DEVICEssDINi FILEssFINi BUFFERS#1 » PRIMARY INPUT 
/ASSIGN 6 SC DEVICEssD0UTi p PRIMARY OUTPUT 
/ASSIGN 212 DUMMy DEVICEssDIN2 FILEs8FIN2 BUFFERS#1 p SECONDARY INPUT 
JASSIGN 293 DUMMY DEVICEssDINS FILEsSFINS BUFFERS#! > TERTIARY INPUT 
/ASSIGN 222 DUMMY DEVICEssDOUT2 FILEs®FOUT2 BUFFERS#1 p SECONDARY OUTPUT 
/ASSIGN 223 DUMMY DEVICEssDOUT3 FILEs®FOUTS BUFFERS#1 > TERTIARY OUTPUT 
/ASSIGN 232 DUMMY DEVICEssDFB@ FILE: #FF@ BUFFERS#1! , FILE @ 

/ASSIGN »31 DUMMY DEVICEssDFi FILEsSFFi BUFFERS#1 « FILE 1 

7END 


en 
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~# CREATE PLEXIA,COMMENT, "PLEXUS COMPILE, ILTs AND ASM® 


/REPLACE PLEXIA » PLEXUS COMPILE, ILT.. AND ASSEMBIE . 

/EXEC OBJ8(1,SYSTEM/PLEXUS) HEM#(390,>94C8,270B) PRYYs(1,2)3 

/ TIME27200 MEMs=sMEM TIMEseTIM 

ASSIGN = @ SC DEVICEs#DERR - ERROR MESSAGE 
/ASSIGN 5 DISC1 DEVICEssDSRC FILEt#FSRC BUFFERS®! - SOURCE INPUT 
/ASSIGN 6 SC DEVICEz#DLSTC FILEs*FLST BUFFERSS1 . SOURCE |.ISTING 


/ASSIGN 222 DISCL FILES(TEMP,DATA) NEW BUFFERS#1 LINKSEQ? 

/ ACCESSSCANYSANYsANYS ANY) ALLOCATE® (18,380,160, 19). DATA DIV INT CODE 
/ASSIGN 223 DISCY FILESC(TEMP,PROC) NEW BUFFERS! LINKSEQ?} 

/ ACCESSB (ANY, ANY ANY ANY) ALLOCATE #(10,300.160218). PROC DIV INT CODE 
7ZASSIGN 225 DUMMY 

JEXEC OBJs(isSYSTEMPILT980) MEM®(368,>94C0,2508) PRTYs(1,2)3 
/ TIME#7200 MEMs=MEM TIMEssTIo 

7 ASSIGN @ sc DEVICE: #DERR 

/ ASSIGN 6 sc DEVICEssOLSTI FILE:8FLST BUFFERS#1 

JASSIGN 212 DISC1 FILEsC(TEMP, DATA) DELETE BUFFERS#1 

/ASSIGN o13 DISCS FILES(TEMP, PROC) OELETE BUFFERS#{1 

/ASSIGN 214 DISCL FILES(TEMP,SCRR) NEW BUFFERS#1 RELREC3 


. 


ERROR MESSAGE 
PRINTOUT 

DATA DIV INT CODE 
PROC DIV INT CODE 


eo “eo *e “» 


/ ACCESS(ANY,ANY,ANYSANY) ALLOCATES (10-308,128-10)3 

/ — LRECL®64 . REL REC SCRATCH 
/ASSIGN 223 DISC1 FILESCTEMP,ILTOUT) NEW BUFFERS#! LINKSEQS 

/ ACCESS# (ANY sANY »ANYS ANY) ALLOCATES (10,308.128.30), ILT OUTPUT 
/ASSIGN 224 DISC1 FILES(TEMP,SCRR) OELETE BUFFERS#1 » REL REC SCRATCH 
/ASSIGN 538 DISC1 FILESCSYSTEM,MDEF) SHARE BUFFERS#1 - MACHINE DESCRIPT 
/EXEC OBJe(1,SYSTEM/ASMBLR) MEM®(390,20088,2080) PRTY#(1,2)3 

/ TIMES1800 

/ASSIGN  @ DUMMY > SYSTEM MESSAGE 
/ASSIGN 4 DUMMY > CONTROL/MESSAGE 
ASSIGN 5 DISCL FILE#C(TEMP,ILTOUT) BUFFERS#4 » ASSEMBLY INPUT 
/ASSIGN 6 SC _ DEVICESsOLSTA FILEs*FLSY BUFFERS#! . ASSEMBLY LISTING 
“ASSIGN 7 DISCi DEVICEssD0BJ FILE*(USERA1,ASMOUT) FILE3=FOBJ? 

/ REPLACE BUFFERS#1 LINKSEG ACCESS=CANYsANY@ANYSANY)3 


/ ACCESS:sCOBJ ALLOCATE#®(1,@,128,28) ALLOCATErsLOBJ. OBJECT OUTPUT 
/ASSIGN 16 DISC1 FILES(TEMP,SCRL) NEW BUFFERS#®1 LINKSEQS 

a ACCESSSCANY,ANY.ANYeANY) ALLOCATES (10-308,.256-30). ASSEMBLY SCRATCH 
7END 


I 
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o# CREATE PLEXUP,COMMENT,*"PLEXUS GENERATED UPDATE LPF ® 
/REPLACE PLEXuP « PLEXUS COMPILE, ILT. ASSEMBLE MODULE ANN 
EXEC OBJe(1,SYSTEM,PLEXUS) MEM#(398,>94C8,2708) PRTYs(1,2)3 


/ TIMEs72@0 MEMs=MEM TIME ssTIM ’ 
/ ASSIGN @ SC  ODEVICEssDERR . , 
/ ASSIGN 5 DISCi DEVICEssO0SRC FILE:sFSRC BUFFERS#1 ‘ 
/ ASSIGN 6 sc DEVICEssOLSTC FILEs*FLST BUFFERS#1 ‘ 
/ASSIGN 222 DISCi FILESC(TEMP,DATA) NEW BUFFERS81 LINKSEQ} ; 
/ ACCESS (ANY,ANY,ANY*ANY) ALLOCATES (10,5309,1608,18). 
/ASSIGN 223 DISC1 FILEs(TEMP,PROC) NEW BUFFERS#1 LINKSEQG} ; 
/ ACCESS#(ANY,ANY,ANYSANY) ALLOCATE®(18,308.168,12). 
/ASSIGN 225 DUMMY 

SEXEC OBJeC i, SYSTEM,ILT9BA) MEM" (590,794C9,2500) PRIY#(1,2)3 

/ TIME®7208 MEMs=sMEM TIME: TIM ; 
/ASSIGN @ SC DEVICEs=DERR s 
/ ASSIGN 6 SC  DEVICEssDLSTI FILE: SFLST BUFFERS#1 F 
/ASSIGN 212 DISC FILES(TEMP,DATA) DELETE BUFFERS*®1 “ 
/ASSIGN o13 DISC{1 FILESC(TEMP,PROC) DELETE BUFFERS}! Fs 
/ASSIGN 214 DISC] FILEsSC(TEMP,SCRR) NEW BUFFERS#{1 RELREC3 

/ ACCESS#(ANY,ANY,ANYe ANY) ALLOCATE®(18,360.128,10)3 
/ LRECL #64 

/ASSIGN 223 DISCi FILESC(TEMP,ILTOUT) NEW BUFFERS#1i LINKSEQ; | 
/ ACCESSBCANYSANYCANYSANY) ALLOCATE® (10,309,128, 38). 
/ASSIGN 224 DISCI FILESC(TEMP,SCRR) DELETE BUFFERS#1 e 


/ASSIGN 238 DISC’ FILESC(SYSTEM,MDEF) SHARE SUFFERS! 
/EXEC OBJs(1,SYSTEM,ASMBLR) MEM®(390,29080,2808) PRTYs(1,2)3 


/ TIMES1802 
/ASSIGN 8 DUMMY A 
/ASSIGN 4 DUMMY ‘ 
/ASSIGN 5 DISC1 FILESCTEMP,ILTOUT) DELETE BUFFERS#1 P 
/ASSIGN 6 SC DEVICErsDLSTA FILE:SFLST BUFFERS®1 : 
/ASSIGN 7 DISC FILES{TEMP,ASMOUT) NEW BUFFERS#! LINKSEQ? | 
/ ACCESS (ANY,ANY.ANYSANY) ALLOCATE® (18, 308.128,2A). 
/ASSIGN 16 DISCS FILES(TEMP,SCRL) NEW DELETE BUFFERS#13 

, LINKSEQ ACCESS#(ANY,ANY,ANY ANY) 3 


ALLOCATES (18,380,256,39) 
/exec OBJs(1,SYSTEM,/LPFBLD) MEM= (300, 8800,3000) PRTY#(1,2)5 


TIMEs@1 
/ ASSIGN @ DUMMY ; 
/ASSIGN 5 DISC{ DEVICE:sD0BJ FILES(TEMP,ASMOUT) BUFFERS#1 , 
/ASSIGN 6 SC _ DEVICEssDLSTU FILEs®FLST BUFFERS#=1 ‘ 
/ASSIGN 9 DISC{ DEVICE:sDUPD FILEs(SYSTEM,DXLPF) FILEssFUPD} 
/ BUFFERS#2 : 


“END 

o# CREATE RESTLP,COMMENT, "RESTORE LPF FROM MY TO DISC * 
/REPLACE RESTLP « RESTORE LPF FROM MAG TAPE TO DISC , 
/EXEC OBJe(L,SYSTEM,DXCOPY) MEM®(390,4908,3900) PRYY#(1,2)3 
/  TIMEsel MEMSSMEM 

/ASSIGN § DUMMY DEVICE: =sDCON : 
/ASSIGN 6 SC DEVICEs#OLST FILEssFLST BUFFERS#1 ‘ 


/ASSIGN 7 DISC{ DEVICESsDOUT FILEs(SYSTEM,LPF) FILES=FOUT; 
/ REPLACE BUPFERS=2 BUFFERS:S8B0UT INDEXED) 

/ ACCESS (ANY,ANYsANY*ANY) ACCESS8 COUT! 

/ ALLOCATES(2,0,128,58) ALLOCATES #LOUT KEYLENS6 
passion 8 MT{ DEVICE:sDIN FILE:sFIN BUFFERS#2 

/ 


WPDATE |.PF . 


ERROR MESSAGE 
SOURCE INPUT 
SOURCE LISTING 


DATA DIV INT CODE 


PROC DIV INT CODE 


ERROR MESSAGE 
PRINTOUT 

DNATA DIV INT CODE 
PROC DIV INT CODE. 


- REL REC SCRATCH 


TILT OUTPUT 
REL REC SCRATCH 


« MACHINE DESCRIPY 


SYSTEM MESSAGE 
CONTROL /MESSAGE 
ASSEMBLY INPUT 
ASSEMBLY LISTING 


OBJECT OUTPUT 


eo ASSEMBLY SCRATCH 


CONTROL 
OBJECT INPUT 
UPDATE LISTING 


UPDATE FILE 


CONTROL/MESSAGE 
LISTING 


OUTPUT 
INPUT 
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.# CREATE SMR 
/REPLACE SMR 


sCOMMENT, “SOURCE MAINTENANCE ROUTINE * 
e SOURCE MAINTENANCE ROUTINE . 


/EXEC OBJs(1,SYSTEM, SMR) MEMS (30@,11508,5968) PRTY#(1,15)3 


/ 

7 ASSIGN 
/ ASSIGN 
/ ASSIGN 
/ASSIGN 
/ ASSIGN 
/ 


/ 
/ASSIGN 
/ 

/ 
/ASSIGN 
/ ASSIGN 
/ ASSIGN 
7END 


226 
235 
245 


TIMEs=-] MEMS sMEM 


SC DEVICE: s0MSG 
SC DEVICEssDCON FILEssFCON BUFFERS#1 
DUMMY DEVICEssOLST FILEssFLSY BUFFERS#1 


MT¢ DEVICEssD0LD FILErsFoLO BUFFERS#1i LINKSEQ 


> DUMMY DEVICEs:s0COM FILEssFCOM REPLACE?#RCOMs 


BUFFERS21 LINKSEQ ACCESSa(ANY,ANYsANYSANY D3 
ALLOCATE sLCOM 

DUMMY DEVICE: sDNEW FILEteFNEW REPLACE 3 sRNEW 
BUFFERS#1 LINKSEQ ACCESS@(ANY.ANY,ANYeANY D3 
ALLOCATES s*LNEw 

DUMMY 

DUMMY DEVICEssDEV35 FILE:®FIL35 BUFFERS#2 
DUMMy DEVICE? sDEV45 FILE: 8FIL45 BUFFERS#s2 


o# CREATE SMRASM,COMMENT, "SMR, ASM, ANT UPDATE LPF : 


/REPLACE SMRASM. 


e SMR, ASM, UPDATE LPF . 


7EXEC OBJs(1,SYSTEM,SMR) MEM=(309,11500,5008) PRTY#(1,15)3 


*~~*e % * 


o~ ew * 


/ TIMEse{ 

/ASSIGN  @ DUMMY 

/ASSIGN 4 8¢ DEVICE:sDCON FILEssFCON BUFFERS#®1 

/ASSIGN 6 DUMMY DEVICEss0LST 

/ASSIGN 245 MT¢ DEVICE:s00LD FILEseFoLD BUFFERS®1 

/ASSIGN 222 DISC1 FILES(TEMP,SMRWRK) NEW BUFFERS#1 LINKSEQ; 
/ ACCESSS(ANY,ANY,ANYS ANY) ALLOCATE®(2,300,128,20) 
/ASSIGN 225 DUMMY 

/ASSIGN 226 DUMMY 

/ASSIGN 235 DUMMY 

/ASSIGN 245 DUMMY 

/EXEC OBJe (1, SYSTEM,ASMBLR) MEM#(390,20000,2008) PRTYa#(1,2)3 
/ TIMEsi80a 

/ASSIGN @ DUMMY 

/ASSIGN 4 DUMMY 

/ASSIGN 5 DISCL FILESCTEMP,SMRWRK) DELETE BUFFERS#} 
/ASSIGN 6 8C DEVICEssDLSY 

/ASSIGN 7 DISC FILES(TEMP,ASMOUT) NEW BUPFERSS{ LINKSEQ} 
/ _ -ACCESS®(ANY,ANY,ANYSANY) ALLOCATE®(198,300,128,30). 
“ASSIGN 146 DISC{ FILEsC(TEMP,SCRL) NEW DELETE BUFFERS#1) 

/ LINKSEQ ACCESS®(ANY.sANY.ANYS ANY)? 


ALLOCATE? (18,300,256,38) 


/ 
pone OBJe(1,SYSTEM,LPFBLD) HEM@(300, 6g88,.3000) PRTY=(1,2)3 


7ASSIGN 
A ASSIGN 
/ ASSIGN 
/ASSIGN 
/ 

7END 


4 
5 
6 


9 DISC1 DEVICEr=DUPD FILEsCSYSTEM,DXLPF) FILEseFUPD 


TIMEse1 

DUMMY 

DISCi FILE#(TEMP,ASMOUT) BUFFERS#! 
sc DEVICEss0LST 


BUFFERSs2 


B- 16 


ERROR/USER MSG 
CONTROL 

LISTING 

OLD LIBRARY FILE 


COMPILE OUT FILE 


NEW LIBRARY FILE 

JCL UPDAT CON OUT 
INCLUDE LUN OPT 1 
INCLUDE I.UN OPT 2 


ERROR/USER MSG 
CONTROL 

LISTING 

OLD LIBRARY FILE 
COMPILE OUT 
NEW LIBRARY 
JCL CON OUT 
INCLUDE 1.UN 
INCLUDE {.UN 


FILE 
FILE 
FILE 
OPT 
OPT 


SYSTEM MESSAGE 
CONTROL/ MESSAGE 
ASSEMBLY INPUT 
ASSEMBLY LISTING 


OBJECT OUTPUT 


- ASSEMBLY SCRATCH 


ecwe™ WwW * 


CONTROL 
OBJECT INPUT 
UPDATE LISTING 


UPDATE FILE 
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e# CREATE SMRPLX,COMMENT, "SMR,PLEXUS,ILT»/ASM,UPDAT LPF® 


/REPLACE SMRPLX 


e SMR, PLEXUS, ILT, ASM, UPDATE LPF ,. 


fac OBJs(1,SYSTEM,SMR) MEM® (389,11508,5080) PRTY=(1.15)3 


TIMEs-{ 
assign @ DUMMY e ERROR/USER MSG 
/ASSIGN 4 SC DEVICEs=#DCON FILEt#FCON BUFFERS#1 > CONTROL 
/ASSIGN 6 DUMMY DEVICEssDLST - LISTING 
/ASSIGN 245 MT$ DEVICE:sDOLD FILEt=FOLD. BUFFERS#1 - OLD LIBRARY FILE 
JASSIGN 222 DISC1 FILESC(TEMP,SMRWRK) NEW BUFFERS#1 LINKSEQ; _ 
/ _ ACCESS®CANY,ANY,ANY/ANY) ALLOCATE®#(2,300,128,38) . COMPILE OUT FILE 
/ASSIGN 225 DUMMY » NEW LIBRARY FILE 
/ASSIGN 226 DUMMY - JCL CON OUT FILE 
/ASSIGN 235 DiMMY , INCLUDE i.UN OPT 
/ASSIGN 245 DUMMY - INCLUOE LUN OPT 
/EXEC OBJa(1,SYSTEMsPLEXUS) MEM®(3G0,>94C0,2500) PRTYs(1, 2). 
/ TIME®7200 MEM! =MEM 
/ASSIGN  @ DUMMY . » ERROR MESSAGE 
/ASSIGN 5 DISC1 FILES C(TEMP,SMRWRK) BUFFERS#1 : PRIMARY INPUT 
ZASSIGN 6 SC DEVICE: s#0LST | . . SOURCE L.ISTING 
/ASSIGN 222 DISCL FILES(TEMP,DATA) NEW RUFFERS#1 LINKSEQ? 
/ ACCESSS(ANY,ANYSANYPANY) ALLOCATE®(10,308,160,10%). DATA DIV INT CODE 
/ASSIGN 223 DISC1 FILES(TEMP,PROC) NEW BUFFERS#1 LINKSEQ? 
/ ACCESS@(ANY,ANY,ANYCANY) ALLOCATES (10,308.160,109). PROC DIV INT CODE 
ZASSIGN 225 DUMMY 
/EXEC OBUel(i,SYSTEM,ILT968G) MEN®(3G6,>94C0,2506) PRTY#(i,2)3 
/ TIME2720@8 MEMseMEM . 
/ASSIGN  @ DUMMY > ERROR MESSAGE 
/ASSIGN 6 SC _ DEVICEs=DLST - PRINTOUT 
/ASSIGN 212 DISCAL FILES(TEMP,DATA) DELETE BUFFERS#1 - MATA DIV INT CODE 
/ASSIGN 013 DISC1 FILE=(TEMP,PROC) MELETE BUFFERS#1 - PROC DIV INT CODE 
/ASSIGN 214 DISCL FILEsC(TEMP,SCRR) NEW BUFFERS#1 RELREC? 
/ ACCESS#(ANYSANYSANYSANY) ALLOCATE (10,508,128,18) 3 
f LRECI 264 . REL REC SCRATCH 
/ASSIGN 223 DISCi FILESC(TEMP,ILTOUT) NEW BUFFERS#1 LINKSEQ} 
/ ACCESS (ANY, ANYSANY*ANY) ALLOCATES (18, 308,128,30), ILY OUTPUT 
/ASSIGN 224 DISCL FILES(TEMP,SCRR) DELETE BUFFERS#1 - REL REC SCRATCH 
/ASSIGN 238 DISC{ FILE#(SYSTEM,MDEF) BUFFERS#1 . MACHINE DESCRIPT 
/JEXEC OBJs(1,SYSTEM,ASMBLR) MEM®(398,29000,2008) PRTY#(1,2)} 
/ TIMES1820 
/ASSIGN 8 DUMMY » SYSTEM MESSAGE 
/ASSIGN 4 DUMMY - CONTROL/MESSAGE 
/ASSIGN 5 DISC1 FILESC(TEMP,ILTOUT) DELETE BUFFERS#! > ASSEMBLY INPUT 
/ASSIGN 6 SC DEVICEssDLST » ASSEMBLY LISTING 
/ASSIGN 7 DISC1 FILES(TEMP,SMRWRK) BUFFERS#1 - OBJECT OUTPUT 
ZASSIGN $6 DISC! FILES(TEMP,SCRL) NEW DELETE BUFFERS#13 
/ LINKSEQ@ ACCESS®(ANYsANY,ANYSANY) 8 
/ ALLOCATES (10,300,256,39) . ASSEMBLY SCRATCH 
/EXEC OBJs(1,SYSTEMLPFBLO) MEM@(3a0,8002,3000) PRTY#(1,2)3 
/ TIMEse1 : 
/ASSIGN = @ DUMMY » CONTROL 
/ASSIGN § DISC1 FILES(TEMP,SMRWRK) BUFFERS#1 » OBJECT INPUT 
/ASSIGN 6 SC _ DEVICEss0LST UPDATE L.ISTING 
/ASSIGN 9 DISC1 DEVICE: sDUPD FILEs(SYSTEM,DXLPF) FILES#FUPO) 
/ BUFFERS#2 UPDATE FILE 
7END 


Digital Systems Division 


943005-9701 


e# CREATE YANK ,COMMENT, "FETCH JCL SEQUENCE . 
/REPLACE YANK e FETCH JCL SEQUENCE . 

/EXEC OBJa(L,SYSTEM/SMR) 4MEM#(3089,11500,5008) PRTYS(1.15)3 
/ TIMEse! MEM3eMEM PRTIYtePRI TIMEssTié 


ERROR/USER MSG 
CONTROL 

LISTING 

OLD LIBRARY FILE 


/ASSIGN  @ DUMMY 

/ASSIGN 4 SC DEVICE: #DCON 

7 ASSIGN 6 DUMMY DEVICErs0LST ; 

/ASSIGN 215 DISC1 FILE#(SYSTEM,JCLSRC) BUFFERS#1 

VASSIGN 222 DISCi FILESCTEMP,COMPIL) NEW BUFFERS#1 LINKSEOS 


i i ee 


/ ACCESSBCANY,ANY, ANY ANY) ALLOCATES (1,0,256,3) ~ COMPILE OUT FILE 
/ASSIGN 225 DUMMY . NEW LIBRARY FILE 
/ASSIGN 226 DISCA FILEs(SYSTEM,JCLCUP) REPLACE BUFFERSS1} 

/ LINKSEQ ACCESSS(ANYsANY,ZANY,ANY)S 

/ ALLOCATE®(1,8,64.1) . JCL UPDAT CON OUT 
/ZEXEC OBJs(1,SYSTEM,BLDEDT) MEM#®(308,550,2008) PRTY#(1,15)3 

/ TIMEse{ MEMS=eMEM PRTysePRI TIMESe7IM ; 

/ASSIGN 16 DISC FILEs(TEMP,COMPIL) BUFFERS#1 . SOURCE INPUT 
/ASSIGN 2@ DISC1L FILE#(SYSTEM,JCWORK) REPLACE BUFFERS#23 

/ INDEXED ACCESS#C(CANY>SANY,ANYSANY DE | 

- ALLOCATE®(1,@,256,3) KEYLEN#2 - SOURCE OUT FILE 
7END 
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APPENDIX C 
ADDING TO ITS 


C.1l ITS INTERNAL STRUCTURE 
NOTE 


The ITS design includes the ability to support a 
polled terminal for future expansion. This fea- 
ture does not apply to the hardware currently 
supported with DX980. 


Before modifying ITS or adding application programs to run under ITS, the 

programmer must understand the structure of the subsystem. The subsys- 
tem consists of four main parts: Terminal Process Monitor, Terminal J/O 
subroutines, Supervisor, and individual application programs. Figure C.1 

illustrates the interrelation of these components. The following paragraphs 
explain the operation of each component. 
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Figure C-1. ITS Components 
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C.1.1 TERMINAL PROCESS MONITOR 


The Terminal Process Monitor (ITTPMN) is the main task for ITS and coor- 
dinates the operation of the other tasks in the subsystem. Figure Gaz. pro- 
vides a conceptual flow chart for ITTPMN. The monitor calls two subrou- 
tines, scans the PRCESS flag for each of the terminals connected to it and 
activates the I/O subroutines. 


C.1.1.1 ITINIT. When ITS is first activated, the monitor calls the ITINIT 
subroutine. This subroutine examines the Logical Device Tables (LDT) for 
the job, to determine what terminals are under control of ITS, and the DX980 
Physical Device Table (PDT) for the assigned devices, to determine the 
characteristics of each terminal. (ITS uses a special SVC so that these func- 
tions can be performed while executing in the protected mode.) From this 
information the subroutine builds a terminal list in the ITS workspace area 
for each terminal assigned to ITS. The list contains the characteristics of 
the terminals. Table C-1 defines the information contained in a list entry 
for one of the terminals. 


In addition to building a terminal list, ITINIT allocates one 1/O buffer for 
each full duplex terminal and a specified number of I/O buffers to support 
polled terminals. Each full duplex I/O buffer is permanently assigned to the 
full duplex terminal. The polled terminal 1/O buffers are dynamically as- 
signed. ITINIT also allocates one Physical Record Block (PRB) and creates 
one I/O task for each I/O buffer. The 1/O tasks for full duplex buffers use 
the reentrant procedure, ITFDIO. The I/O tasks for polled buffers use the 
reentrant procedure, ITPBIO. ITINIT sets the Read Terminal (RDTRM) flag 
for each of the terminals and starts them in their respective I/O task. When 
all 1/O tasks are created, ITINIT returns controlto ITTPMN. The 1/O tasks 
are described later in this section. 


C.1.1.2 TERMINAL LIST SCAN. When ITINIT returns to ITTPMN, the 
monitor starts scanning each entry in the Terminal List to determine if any 
PRCESS flags are set. The PRCESS flag indicates that the terminal operator 
has entered a complete record that is ready for processing by ITS. When 
ITTPMN encounters a terminal entry with a set PRCESS flag, it calls the 
Supervisor (ITSUPV) to service the request from the terminal. If ITTPMN 
scans the entire Terminal List without finding a set PRCESS flag, it suspends 
itself for one-half second. At the end of the delay period, ITTPMN reacti- 
vates and begins the table scan again. Each scan cycle after the delay period 
begins with the first entry in the list and continues sequentially through the 
list until it reaches the end or detects a PRCESS flag. When returning to the 
scan cycle after servicing a PRCESS flag, the scan starts at the terminal 
following the serviced terminal in the list. ITTPMN does not take the one- 
half second delay at the end of a cycle if it has serviced a terminal during that 
cycle. 
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Figure C.2, Terminal Process Monitor Conceptional Flow Chart 
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Table C.l1. 


TYPTRM 


PRCESS 


WRTTRM 


LUN 


TRMTSK 


UCBPTR 


PRBPTR 


TRBFLN 


ITS Terminal List Entry 


Read Terminal Flag: Setting this flag in- 
structs the I/O task for the terminal to 
issue a Read Terminal I/O call. 


Terminal Type: If this bit is a 0, the cor- 
responding terminal is a full duplex termi- 
nal; if this bitis al, the terminalis a 
polled terminal. 


Process Flag: The terminal I/O task sets 
this flag to indicate to ITTPMN that data 
from the corresponding terminal is ready 
for processing. 


Write Terminal Flag: Setting this flag in- 
structs the I/O task for the terminal to 
issue a Write Terminal I/O call. 


Buffer Number: This number indicates 
which of the polling buffers has been dy- 
namically assigned to this terminal. This 
field is not used for full duplex terminals. 


Logical Unit Number: Indicates which 
LUN that the terminal responds to. 


Terminal Task: Task identification of the 
last 1/O task that serviced this terminal.. 
This field is static for a full duplex termi- 
nal and dynamic for a polled mode terminal. 


User Control Block Pointer: The location 
of the user control block for the terminal. 


Physical Record Block Pointer: The loca- 
tion of the PRB for the terminal. This 
field is static for a full duplex terminal and 
dynamic for a polled mode terminal. 


Terminal Buffer Length: The number of 
characters that can be put into the buffer 
for the terminal. 
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C.1.1.3 ITSUPV. ITTPMN calls the ITSUPV to service a terminal whose 
PRCESS flag is set. ITSUPV is a major part of ITS and is discussed in de- 
tail later in this section. During processing, ITSUPV resets the PRCESS 

flag so that it will not be recognized again during the next table scan. How- 
ever, application programs called by ITSUPV may set the PRCESS flag again 
if they do not complete processing. If ITSUPV requires additional input from 
the terminal, it sets the RDTRM flag before returning to ITTPMN; if data out- 
put to the terminal is required, ITSUPV sets the WRTTRM flag before re- 


turning to ITTPMN. 


C.1.1.4 TERMINAL I/O. If either the RDTRM or the WRTTRM flag is set 
when ITSUPV returns to ITTPMN, the monitor issues a POST to activate an 
1/O task. If the terminal operates in full duplex mode, the monitor activates 
a task using the ITFDIO procedure; if the terminal is a polled terminal, the 
monitor activates a task using the ITPBIO procedure. Either of these tasks 
(initially created by ITINIT) transfers data to and from the terminal device 
by issuing I/O supervisor calls. 


C.1.2 FULL DUPLEX I/O TASK (ITFDIO) 


When building the Terminal List, ITINIT determines if a terminal is operat- 
ing in full duplex mode. For full duplex terminals, ITINIT allocates memory 
to supply a terminal buffer (including one extra word for format control) and 
a Physical Record Biock (PRB) for that terminal. It also creates a task with 
pointers to the PRB and the Terminal List as arguments and places the task 
identification in word 1] of the Terminal List entry for that terminal. The 
task, the terminal buffer and the PRB remain associated with the terminal. 
ITFDIO uses information in the terminal list to direct 1/O operations between 
the ITS and the full duplex terminal. Figure C-3 illustrates the functions 


performed by the subroutine. 


C.1.2.1 TASK INITIATION. Before ITINIT creates a terminal task for 
ITFDIO, it sets the RDTRM flag in the Terminal List entry for that terminal. 
Therefore, when ITFDIO begins execution, it issues an1I/O SVC to read data 
from the terminal. ITINIT starts tasks for each terminal in the system in 
the same manner, so that when ITINIT returns control to ITTPMN, ali ter- 
minal tasks are waiting for input from the corresponding terminals. 


C.1.2.2 PROCESS REQUEST. When the operator enters a complete rec- 
ord of data at the terminal, the data terminal Device Service Routine (DSR) 
returns control toITFDIO. ITFDIO then resets the RDTRM flag to indicate 
the completion of a read operation, and sets the PRCESS flag to indicate that 
the data is in the input buffer and requires attention from ITSUPV. ITFDIO 
then suspends processing to wait for either the RDTRM or the WRTTRM flag 
to set. 
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Figure C-3,. ITFDIO Conceptual Flow Chart 


a 


C.6 Digital Systems Division 


(@) 
WO) 943005-9701 


C.1.2.3 RESPONSE TO TERMINAL. If ITSUPV, or a subordinate applica- 
tion subroutine, produces data in response to.a terminal request, it also sets 
the WRTTRM flag after filling the terminal buffer with data to be written to 
the terminal. This flag causes ITTPMN to post the ITFDIO task for that ter- 
minal and instructs that task to issue a Write Terminal 1/O SVC. If more 
data is required, RDTRM is set. If both WRTTRM and RDTRMare set, the 
I/O is performed in the order of write and then read. Neither ITSUPV or the 
subordinate applications issue I/O SVCs to communicate directly with the ter- 
minals. 


C.1.2.4 DISPLAY SIZE. During construction of the Terminal List, ITINIT 
determines the display size of the terminal from the PDT. The display size, 
plus the format control word, determines the allocated buffer size for the 
terminal, and also specifies the length field in the PRB when the terminal is 
opened. Buffer lengths for the terminal devices are as follows: 


e Teleprinter - 82 characters 
@ Teletype - 74 characters . 
e CRT - variable up to 1922 characters 


If available memory cannot support several terminals with a 1922 character 
display, the PDT can be modified to reduce the display size. The display 
size for CRTs can be reduced to 80 characters so that the CRT responds as 
a teleprinter. : 


C.1.3 POLLED TERMINAL I/O TASK (ITPBIO) 


The polled I/O routine (ITPBIO) is a reentrant subroutine that, unlike 
ITFDIO, does not require a task for each terminal. Instead, ITINIT creates 
a task for each polling buffer. The number of polling buffers can be signifi- 
cantly less than the number of terminals. Figure C-4 illustrates the func- 
tions performed by the subroutine. 


C.1.3.1 TASK INITIATION. When ITINIT determines that there is one or 
more polled terminals assigned to ITS, memory is allocated for a specified 
number of polling buffers and PRBs. The number of polling buffers specified 
for the standard ITS is two. Although this number can be increased, two 
should be adequate for most applications. Unlike full duplex terminals, a 
task is not created for ITPBIO when a polled terminal is added to the terminal 
list. However, like full duplex terminals the RDTRM flag is set. After all 
terminals have been added to the terminal list, ITINIT allocates memory for 
a buffer and PRB, and creates a task for each polling buffer. The first time 
through, ITPBIO does not issue a terminal read since ITINIT does not specify 
which terminals should be polled. Thus control goes immediately to an SVC 
to suspend ITPBIO until posted by ITTPMN., 
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Figure C-4, ITPBIO Conceptual Flow Chart 
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C.1.3.2 PROCESS REQUEST. ITTPMN checks the status of the polling 
buffers and the polling lines (communication modules) if: 


1) aterminalis ready for processing and ITTPMN calls ITSUPV, or 


2) no terminal is ready for processing and ITTPMN suspends itself 
for one-half second. 


If both a polling buffer and a line are free, ITTPMN issues a post for the ap- 
propriate ITPBIO together with a pointer to the line to be polled. 


After receiving control, ITPBIO issues a read to each terminal on the polling 
line in succession. If a terminal user has pressed the transmit key prior to 
issuance of the read to his terminal, the screen data is transferred when the 
read is issued. If the transmit key has not been pressed, the terminal does 
not respond and the DSR returns control to ITPBIO with a record length of 
zero. This record length is treated as a negative response and a read is 
issued to the next terminal on the line. The first positive response termin- 
ates the poll and the PRCESS flag is set for the corresponding terminal. 
ITPBIO then issues a suspend SVC to wait for another post. 


C.1.3.3 RESPONSE TO TERMINAL. The WRTTRM flag can be set by 
-ITSUPV ora subordinate application subroutine. This causes a post to the 
a ITPBIO task for data transfer. After the data is ee oe 
TPBIO determines whether RDTRM is also set. If RDTRMis set, ITPB 
eoieases the buffer and issues a suspend SVC, If RDTRM is not set, ITPBIO 
sets PRCESS and does not release the buffer. This process allows a pro- 
gram to maintain a buffer throughout a series of data transfers to a terminal. 


C.1.3.4 DISPLAY SIZE. When ITINIT determines that polling buffers are 
required, it also determines the largest display size for the terminals to be 
polled. It then allocates memory to each buffer that corresponds to the maxi- 
mum size. 


C.1.4 SUPERVISOR (ITSUPV) 


The ITS Supervisor (ITSUPV) is a combination state and table driven control- 
ler that acts as an intermediary between ITTPMN and the application pro- 
grams that run under ITS. When ITINIT initializes a terminal, it creates a 
table of parameters, called the User Control Block (UCB), that stays with the 
terminal as long as itis assigned to ITS. The information within the UCB 
varies with the user program that is currently using the terminal. Table C.2 
defines the information fields within the UCB. When control transfers to 
iTSUPV to service a particular terminal, it clears the Terminal List flags 
for that terminal and examines the state-field of the UCB to determine what 
type of servicing is required. Figure C-5 illustrates the logical sequence of 
events within ITSUPV. Table C-3 defines the terminal states and the actions 
required of ITSUPV to service a terminal in that state. 
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Table C-2. ITS Terminal User Control Block (UCB) 


USERID User Identification: This field contains the 
<userid> that is entered at the terminal during a 
Logon operation. Not validated by current 


ITSUPV. Reserved for future accounting software. 


Account Number: This field contains the <acctno> 
that is entered at the terminal during a Logon op- 
eration. Not validated by current ITSUPV. Re- 
served for future accounting software. 


ACCTNO 


Terminal State: This field contains a number that 
indicates to ITSUPV how to respond to a service 
request from the terminal. 


Terminal Pointer: This field contains the mem- 
ory address of a table of device characteristics 
for the terminal. 


TRMPTR 


Operation Pointer: This field contains space for 
the application program to load a pointer for its 
use. 


TIMEON Clock Time of Logon: This field is not used by 


the standard ITS. 


DATEON Calendar Date of Logon: This field is not used by 


the standard ITS. 


TRMLNS Terminal Lines: This field specifies the number 


of lines on the display unit. 


LINLEN Line Length: This field specifies the length of 


each display line. 


These fields provide intermediate storage of 
parameters for the application program currently 
using the terminal. 
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Figure C-5. ITSUPV Conceptual Flow Chart 
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Table C-3. User Control Block State Definitions 


State Number Terminal Conditions/Requirements 


Inactive: User has not entered a Logon command to 
identify himself. ITSUPV checks only for a Logon 
command. 


Ready: User has logged-on, but has not as yet re- 
quested any application program. 


Edit: User is currently running the Interactive File 
Editor (ITIFE) application program. ITSUPV calls 
ITIFE to process request. 


Remote Job Entry: User is currently running the Re- 
mote Job Entry (ITRJE) application program. ITSUPV 
calls ITRJE to process request. 


Status: User is currently running the Status Display 
(ITSTAT) application program. ITSUPV calls ITSTAT 
to process request. 


User Program: User is currently running an applica- 
tion program not normally supplied with ITS. ITSUPV 
transfers control to the user program if the program 
has been entered in the table of recognizable code for 
ITSUPV. 


C.1.4.1 STATE 0. If the UCB State field is zero, the user has not pre- 
viously entered data from the terminal. Therefore, the first command from 
the terminal must be a Logon command to identify the user. In State 0 
ITSUPV calls the command scanner to examine the input code. If the input 
code does not contain a Logon command, ITSUPV returns control to ITT PMN 
without further processing. If the code contains a Logon command, ITSUPV 
validates the syntax, transfers the pertinent data to the UCB and places a 
Ready indication in the I/O buffer. It then sets the WRTTRM flag to ensure 
that the Ready indication is sent to the terminal and sets the RDTRM flag to 
enable the user to respond by entering the next command. ITSUPV then 
places a value of 1 in the State field of the UCB before returning control to 
ITTPMN. | 


C.1.4.2 STATE 1. If the UCB State field is one, the user has logged-on, 
but has not as yet indicated an application program. ITSUPV then calls the 
command scanner to examine the input code (see Section V for a de- 
scription of the command scanner). The input command must be one of the 
commands that ITSUPV can recognize. The standard ITS system provides a 
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table of commands that allows ITSUPV to recognize the following input com- 
mands and their appropriate arguments: 


EDIT 
ENTER 
LOGOFF 


Any user programs that are added to ITS must also add at least one command 
to this list that will link ITSUPV to the user program. ITSUPV processes the 
Logoff command. Application programs process all other commands. If an 
application program processes the command, ITSUPV transfers control to 
that program with a Branch and Link (BRL) instruction. Pointers to the ter- 
minal list entry and to the command scanner data arrays accompany the com- 
mand to the application program. The application program, therefore, has 
access to all control blocks for the terminal, plus the command and argu- 
ments that were entered at the terminal. 


C.1.4.3 OTHER STATES. If the UCB State field is greater than one, 
ITSUPV transfers control directly to the application program. Terminals in 
this state have previously used an application program. That program set 
the state field to a value that returns control to the program for further in- 
put, or that logs-off the user from that program. ITSUPV does not process 
commands in these higher states. Therefore, the application program must 
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C.1.5 APPLICATION PROGRAMS 


Application programs that run under ITS are closed subroutines, The argu- 
ments that ITSUPV passes to the program are pointers to the appropriate 
terminal list entry and the command scanner arrays. Figure C-6 shows the 
relationship between the control blocks and structures. 


C.1.5.1 CONTROL TRANSITIONS. When control is passed to an applica- 
tion program, the RDTRM, WRTTRM, and PRCESS flags are all set to zero 
and the buffer pointer in the PRB points to the first data word in the terminal 
buffer. If this is the initial entry into the subroutine, STATE is set to 1 and 
the key and packed arrays in the command scanner structure contain the de- 
coded command line. Before the application program returns control to 
ITSUPV, the program sets RDTRM, WRTTRM, PRCESS, STATE, and the 
format control word according to the requirements of the application. 
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Figure C-6. ITS Control Blocks 


C.1.5.2 SAMPLE APPLICATION TRANSFER. The following example 
from the file editor illustrates the strategy for performing a function under 
ITS. The terminal is in the Ready state, and the user wants to edit a file by 
changing the string ABC to XYZ everywhere that it appears. The file con- 
tains 50 records. The following sequence performs that operation: 


1. User keys EDIT FILE=(1, USERO1, MYFILE) and presses RETURN 
from a teleprinter; ITFDIO then sets the PRCESS flag. 


nN 


ITTPMN detects that processing was requested and calls ITSUPV. 
ITSUPV calls the command scanner, determines that the command 
is to be processed by the file editor (ITIFE) and makes the call. 
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3. ITIFE calls a subroutine to assign and open the file, and read the 
first file record into the terminal buffer. ITIFE then sets the for- 
mat control word to 000E,4, RDTRMto1, WRTTRM to 1, and 
STATE to 11, and returns control to ITSUPV. ITSUPV returns to 
ITTPMN to activate the 1/O task for the user's terminal. 


4, ITFDIO writes the terminal buffer and issues a read to accept more 
input. 


5. Terminal user enters RA 1,50 /ABC/ /XYZ/ to direct the file editor 


to replace all strings ABC with the string XYZ in the next 50 rec 
ords of the file. 


[om 


ITTPMN detects that processing was requested and calls ITSUPV. 
ITSUPV determines that STATE is between 10 and 19 and calls 
ITIFE, ITIFE calls the command scanner, determines that the com- 
mand is a string operation, and calls a subroutine that processes all 
string commands. The string processor reads 25 records, changing 
ABC to XYZ wherever found. After processing the 25 records, 
(the subroutine interrupts itself rather than being arbitrarily cutoff) 
the string processor changes STATE to 14, leaves RDTRM and 
WRTTRM reset, sets the PRCESS flag and returns control through 
ITIFE and ITSUPV to ITTPMN. ITTPMN does not post the I/O rou- 
tine because neither RDTRM or WRTTRM are set. However, it 

ha 


oe 1 att +t entr 
wie the terminal scan at the next entry. 


7. Intime the terminal scan progresses to the same terminal. ITTPMN 
detects that processing was requested and passes control through to 
the string processor to process the last 25 records. After process- 
ing is complete, the string processor puts the last record processed 
in the terminal buffer, sets RDTRM and WRTTRM to 1, changes 


TTIVE 3 tha £ -~A band «er A 
STATE back to 1] and returns. ITIFE sets the format control word 


to 000E ¢ and returns through ITSUPV to ITTPMN to activate the 
appropriate I/O task. Control then returns to the user. The user 
can key in either more edit commands for further file processing, a 
Stop command to get back to the ready state, or a Logoff command 
to exit the system. 


C.2 DESIGN PRINCIPLES 


Before adding a new application program to ITS, the user must understand 
the design features in the subsystem that provide the highest overall effi- 
ciency for the subsystem. Observance of these principles when implement- 
ing a new program will enhance its performance within the system, 


C.2.1 DUAL MODE OPERATION 


ITS can run in either the protected or the privileged mode. The first DXOLE 
control card (see Section VIII) controls the mode of operation. If the card 
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specifies SUBSYSTEM, the program links for privileged operation; if the 
card specifies NORMAL, the program links for protected operation. Privi- 
leged mode is slightly faster than protected mode since it performs less er- 
ror checking for privileged SVCs. In addition, a privileged mode program 
can be smaller since it can access the runtime package that is linked into the 
memory resident portion of the operating system. 


Protected mode simplifies debugging a new ITS application program, and 
guarantees that an error in the new program will not destroy the operating 
system. When preparing the new program, link it in the protected mode. 
Then check the program by running a single terminal with the PROT param- 
eter specified in the Execute command (EXEC) to the JCL translatore. When 
the application is completely checked in this manner, it can be linked with the 
rest of ITS with SUBSYSTEM specified on the DXOLE control card. 


C.2.2 APPLICATIONS OVERLAY 


To attain maximum memory efficiency, ITS application programs can be 
overlayed. The majority of ITS is coded as reusable subroutines. This con- 
vention allows the overlays to be the simple, preplanned overlays supported 
by DXOLE. 


C.2.3 PSEUDO TIME SLICING 


To avoid monopolizing the system for a single terminal application, all ap- 
plication programs must return control to ITTPMN periodically. To main- 
tain an average access time of three seconds for any terminal and for a total 
of up to 30 terminals, the average processing time for any one terminal re- 
quest must be limited to 100 milliseconds. Many terminal requests require 
less than the 100 millisecond average; long functions may use up to a maxi- 
mum _of 200 milliseconds. The actual interruption of the program, however, 
is left to the program itself. That is, either the program completes its pro- 
cess within the time limit, or the program interrupts its processing at a 
logical breakpoint to return to ITTPMN within the time limit. If the program 
interrupts itself, it returns to ITTPMN with the PRCESS flag set, and with 
both RDTRM and WRTTRM flags clear. Thus, no I/O operations are initiated 
and ITTPMN returns to the program during the next Terminal List scan. 
This process of allowing the program to limit its time instead of being trun- 
cated after an arbitrary period is called pseudo time slicing. 


Two functions in the standard ITS package, the RJE processor and the Display 
Status processor, do not follow the pseudo time slicing guidelines. These 
processors both contain supervisor calls that take longer than 200 millisec- 
onds to perform (Start Job and Stat SVCs, respectively). Control does not 
return to the processor until the SVC is complete. For each of these proces- 
sors a small reentrant module appears in the root segment of the ITS overlay. 
After the Job, Run and Stat commands are syntactically validated, the pro- 
cessor creates a task that points to the reentrant module. The reentrant 
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module issues the SVC, The processor then resets PRCESS, RDTRM and 
WRITRM flags and returns normally to ITTPMN. When the SVC returns, 
the reentrant module sets the PRCESS flag and issues a Delete Task SVC. 
During the next Terminal List scan cycle, ITTPMN detects the PRCESS flag 
and reactivates the processor. 


C.3 MODIFYING ITS 


Calls from ITS to applications programs are driven by a set of tables in the 
module, ITSTBL. To add an application, the ITSTBL source module must 

be modified, assembled, and linked with ITS and with any new applications 
programs. Refer to figure C-7 for a listing of the components in the ITSTBL 
module, Two sets of tables must be modified to add an application: The 
State/Call Translation Tables and the Application Names /Initial Entry Tables. 


C.3.1 STATE/CALL TRANSLATION TABLES 


The State/Call Translation Table, STATET, breaks all of the possible states 
into State Intervals, Once the interval is determined by ITSUPV, itis used 
as an index for an indirect branch through a table of application entry addres- 
ses (SCALLT). Note that on the standard table states 0 through 1 map into a 
call to ITCOM (ITS command decode), states 2 through 19 map to ITIFE (al- 
though only states 10 through 19 are used), states 20 through 29 map to 
ITRJE, and states 30 through 39 map toITSTAT, To add an application that 
uses states 40 through 49, a 'DATA 49' statement must be inserted after the 
'DATA 39' statement in STATET, anda 'DATA application entry point’ must 
be inserted after the 'DATA ITSTAT' statement in SCALLT. This will cause 
ITSUPV to call the given application for states 40 through 49, Note thata 
single application may have more than one state interval and entry address 

if desired. 


C.3.2 APPLICATION NAMES/INITIAL ENTRY TABLES 


This set of tables map application names to initial application entry points. 
The first table, RESLAB, is a list of eight character application keywords. 
The second table, ICALLT, is a list of application entry points that corre- 
spond to the application names, New application names must be inserted 
after the DATA 'JOB', 'DELETE' statement in RESLAB, and new initial entry 
points must be inserted after the last 'DATA ITIFE' statement in ICALLT, 
The order of the standard eight commands may not be changed, 
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IOT ITSTBL 


RARER ARERREREREHREREREEREEHEREREREAREAREETENENARHERERHANERAERG REE HREAHTEEAS 


¢ ABSTRACT ® THIS TABLE CONTAINS THE USER VARIABLE PARAMETERS 
: FOR THE INTERACTIVE TERMINAL SYSTEM, AND DEFINES 
‘ THE APPLICATION NAMES AND ENTRY ADDRESSES, THIS 
* MODULE MUST HE MODIFIED IN ORDER TO ADD ANY 

‘ ADDITIONAL APPLICATTONS ROI'TINES, 

« 

* ROLTINES 

* CALLED © LOGON,LOGUFF,ITRUJE,TTSTAT,ITIFE,ITCOM 

e 

& 


RRR RK REA TERE EERE RERRAAHERERAEEEERAEREEEEUAEARERHATERHENE RAHAT 


KED ITS COMMAND/STATE TABLF 

rrr rn hr rrer rere Trrrrrrerrrrrrerrrrrrrcrerorcercrcrecorcerary 

* NOTE 8 * 

* THIS MODULE MUST KE IMCL''IDED IN THE ROOT SEGMENT « 

err rerr rrr rrree errr rrrrrr rr reTTTTE CT ECEC CCE L SPC rCe reese rarer, 

DEF _ INFO, RESLAB,/KEYArPAKSTR, ICALL, SCALL,S3ATET/POLTIM 
REF LOGON, LOGOFF ,ITRJE,ITSTAT,ITIFE,BADST,ITCOM 

Eau 
EQu 
EQu 
EQU 
EQU 
EQU 
EQU 
EQL 
EQuU 
EQuU 
PEJ 


agaowuvuaroartxm b> 
Gee NOMmsa GON e & 


x wD 


« APPLICATION NAMES (RESLAB) 
RESLAB EQu $ 


DATA 'LOGON ',"LOGOFF ' #** POSYTION SENSITIVE ee 
DATA 'RUN ',"STATUS !' ## POSITION SENSITIVE oe 
DATA 'EDIT ', ENTER ' «a POSITION SENSITIVE «a 
DATA 'JOB ',"DELETE ' wa POSITION SENSITIVE e# 
* INSERT NEY APPLICATIONS ABOVE 
RESD EQU §w#RESLAB THIS LABE! MUST FOLLOW LAST 
NRES E@u RESN/4 APPLICATION NAME 
* 
* INITIAL ENTRY ADDRESS TABLE 
e 
ICALLY EQU §$ 
DATA LOGON A 
DATA LOGOFF { 
DATA ITRJE 2 
DATA ITSTAT 3 
DATA ITIFE 4 
DATA ITIFE 8 
DATA ITRJE 6 
DATA ITIFE 7 
PEJ 


Figure C-7, ITSTBL Listing (Sheet | of 2) 
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* 
STATET 


@aest & 


NPAK 
NKEY 
KEYA 
PAKSTR 


MTRMS 
MLINES 
MBUFS 
— TRMS 
SUFS8 
LINS 
POLTYIM 


UCBSI7 


STATE/CALL TRANSLATION TABLFS 


Fau 
DATA { STATES @0<01 
DATA 19 B2~19 
DATA 29 20=29 
DATA 39 30-39 

INSERT NEW STATES HERE 
DATA = AL! OTHERS 
DATA ITCOM @8222 COMMAND DECODE 
DATA ITIFE 12819 IFE 
DATA ITRJE 28929 RJE 
DATA ITSTAT 30-39 STATUS 

INSERT NE“ CALLS HERE 
DATA BADST ALL UNDEFTNED STATES 
PEJ 


ROUTINE TO MAKE INTTIAL CALL BY APPL, NAME 


EQU §§ 

RMQ B,A SAVE BASE 

RMC 4,8 GET SECONS ARGUMENT 
LDX #2,BR * 

RMO A,B RESTORF BASE 

LDA ICALLT,X GET CALL ADDRESS 
RMQ A,P CALL 


ROUTINE TO MAKE SUBSEQUENT CALLS ACCORDING TO STATE 


Fou 


e 

RMO 8,A SAVE BASE 
RMO M8 GET SECON ARG, 
LDX #2 ,BR « 

RMO A,B RESTORE BASE 
LDA SCALLT,X GET CALL ADDRESS 
RMQ A,P CALL 

PEJ 


CRSCAN CONTROL! ARRAY 


EQU § 

DATA NPAK NUMBER OF CHARS, IN 'PAKSTR! 
DATA NKEY NUMBER OF WORDS IN 'KEYA! 
DATA 8,8 CRSCAN WORKSPACE 

DATA NRES NUMBER OF LABELS IA 'RESLAB! 
DATA ®@ STARTING SCAN POSITION 

EQU 8¢@ NO OF CHAR, IN PAKSTR 

EQU 88 NQ OF WORKS IN KEY ARRAY 
BSS NKEY 

BSS NPAK/2 

DEF TRMS,BUFS,LINS 

EQU 32 MAX, NO, OF TERMINALS 

EQU @ MAX, NC, IF POLLING LINES 
EQu @ MAX. NO. OF POLLING BUFFERS 
BSS 6eMTRMS TERMINAL LIST 

BSS 4eMBUFS BUFFER LIST 

BSS J6eMLINES LINE LIST 

DATA B5au POLLING INTERVAL (IN MILLISECONDS) 
DEF UCB8I7z 

DATA 68 USER CCNTROL BLOCK SIZE 

END 


Figure C-7, ITSTBL Listing (Sheet 2 of 2) 
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C.3.3 CALLING CONVENTIONS 


Calls from ITSUPV follow the standard DX980 calling conventions and are 
as follows: 


e Initial Entry (via Applications Names/Initial Entry tables) 


@ LDM=ARGLST 
@ BRL APPLIC 


ARGLST DATA 2 


DATA TRMLST pointer to TRMLST entry 
DATA keyno pointer to Key Number index 


e Subsequent Entry (via State/Call Translation Tables) 


@ LDM=ARGLST 
@ BRL APPLIC 


ARGLST DATA 2 

DATA TRMLST . 

DATA STATI pointer to state interval 
C.3.4 CRSCAN ARGUMENTS 
The calling argument, key array, and packed string for the command decode 
done in states 0 and 1 are in ITSTBL. 
C.3.5 TRMS 
All TRMLST entries are built in ITSTBL in the buffer 'TRMS', The size of 
this area is controlled by the label, MTRMS. 
C.3.6 POLLING PARAMETERS 


Several parameters may be adjusted to suit the requirements of the user. 
These parameters are: 


e POLTIM - Time interval for polling 
e MLINS - Maximum number of polling lines 


e MBUFS - Maximum number of polling buffers 


C.3.7 USER CONTROL BLOCK SIZE 


The user may alter the size of the USER CONTROL BLOCKS by adjusting the 
value of the statement: | 


UCBSIZ DATA 50 


Note that the minimum UCB size for IFE is 50 words. 


On 
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ADDING NON-STANDARD DEVICES TO DX980 


APPENDIX D 


D.1 GENERAL 


By using DX980 utilities, user supplied routines, and information about the 
I/O package, up to four non-standard devices may be added to a DX980 con- 
figuration. However, non-standard discs cannot be added. To support a 

new device, the user must design, code and install a device service routine in 
the system. In addition, he must implement a utility to build and modify 1/O 
associated tables. This appendix provides the necessary information and 


procedure to accomplish these tasks. 


D.2 WRITING A DEVICE SERVICE ROUTINE 


Writing a new Device Service Routine (DSR) requires a knowledge of the 
DX980 input/output structure, coding requirements for a DSR, plus an under- 
standing of the device characteristics to be allowed for in the routine. The 
following paragraphs provide that background in addition to sample DSR's to 
be used as a guide. 


D.2.1 INPUT/OUTPUT STRUCTURE 


A program initiates Input/Output operations by using an 1/O supervisor call 
(SVC) and passing the required operation via a Physical Record Block (PRB). 
The SVC is actually an illegal instruction that generates an internal interrupt. 
The internal interrupt decoder passes control to the SVC Processor, After 
determining that an 1/O SVC has been made, the SVC Processor gives con- 
trol to the I/O Manager. Figure D-1 illustrates the relationship of the I/O 
Manager within the I/O system. | 


The 1/O Manager performs the required housekeeping of the I/O associated 
tables, controls the available devices, sets up and controls DSR entry and 
exit, and performs all other common I/O SVC functions. The following are 
some of the pre - DSR device independent functions performed by the I/O 
Manager: 


e Control and housekeeping of Open/Close calls 
8 Device ous nmment checks 

@ LUN Open eneelkes 

e Control of the share/exclusive capabilities 

e Data buffer boundary checks 


@ Linking PRB's and Logical Device Tables (LDT's) to the Physical 
Device Tables (PDT's) 
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1/0 MGMT CONTROL PATHS 


svc 
PROCESSOR 


END 


TASK 1/0 MANAGER 


EXECUTE 


FILE 
PREPROCESSOR PROCESSOR 


ACTIVATE NOT FINISHED 


1/O CALL 
PROCESSOR 


TASK 
DRIVEN 
PROCEDURE 


INTERRUPT 
DRIVEN 
PROCEDURE 
SAVE RESTORE POST END 
STATE STATE ACTION 
1/0 TO TASK 
INTERRUPT SCHEDULER 


(B)130247 


Figure D-1. General I/O Flow 
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® Queuing operations when a device is busy 


e Monitoring system operations for initiate I/O SVC's 


8 Calling the correct DSR 


D.2.2 DEVICE SERVICE ROUTINES (DSR's) 


DSR's provide the actual interface with the hardware. They check for illegal 
operations and for special device dependent and unique conditions not monitor- 


a6 ‘ ri e e,e 
ed by the I/O Manager. The DSR's have three standard entries: an initial 


entry, a reset or cancel entry and an interrupt entry. 


D.2.2.1 INITIAL AND CANCEL ENTRIES. For initial entry, the I/O Man- 
ager issues an SVC to begin an I/O operation. The I/O manager also controls 
the cancel or reset entry by. issuing an SVC to the DSR when the system is try- 
ing to terminate an 1/O operation in progress. The SVC is as follows: 


CALL SVC (DSR #, PDT @, TYPE) 


In this form, the term PDT @ represents a pointer to the PDT containing the 
1/O information. The term TYPE indicates that the call is either an initial 
or a cancel entry to the DSR. 


Since the I/O Manager calls DSR's with an SVC, the DSR can have only one 
entry point. For this reason and also to perform some common logic rou- 
tines, the DSR executes a system routine (ISDSRI) immediately when entered. 
This call must appear in all DSR's and has the following format: 


REF ISDSRI 

START EQU $ 
RMO L,A_ Ist word of code 
@BRL ISDSRI — 
DATA interrupt entry pointer 
DATA cancel entry pointer 


(logic for initial entry) 


The initial entry checks operation validity, starts the I/O operation and, if 
possible, completes the operation. The reset path terminates the I/O opera- 
tion by reseting the interrupt logic and, trying to halt the I/O device. 


D.2.2.2 INTERRUPT ENTRIES. 1/0 interrupts can occur during or at the 
end of an I/O operation from either an I/O Bus or a Direct Memory Access 
Channel (DMAC) device. I/O bus interrupts can occur following each char- 
acter transfer while DMAC devices usually interrupt when the operation is 
complete. The operations following an interrupt resemble the response to a 
supervisor call. However, the interrupt decoder coordinates the activity 
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instead of the SVC Processor. The interrupt decoder transfers control to 
the DSR through the interrupt entry. The interrupt entry either completes the 
operation or prepares for further interrupts. 


D.2.2.3 REGISTER INITIALIZATION. Regardless of the type of entry, 
when the DSR is entered from the entrance utility, the following registers are 
initialized: 

® Register E = 0 


e Register S = entry address of the utilities 


e Register M = pointer to the PRB 
e Register B = pointer to the PDT 


In addition, if the entry was an initial entry, registers A and X contain the 


operation code. 


D.2.2.4 EXITS. For any type of entry the DSR may take one of six possible 
exits (see the DSR EXIT utility). These may be classified into three groups. 
The NORM exit is the normal exit from the DSR when no abnormal conditions 
have been detected and the data transfer is not yet complete. The EOR exit 
indicates an End-of-Record exit when the requested data transfer is complete. 
Other types of exits are used to indicate that abnormal conditions were en- 


countered. 


D.2.2.5 I/O ERRORS. Errors that occur during an I/O operation are 
described in Section III of this manual. The I/O Error numbers listed in 
Section III are in the range of 201 - 209. However, the I/O Manager adds 
200 to the error number returned by the DSR. Therefore, the DSR need 
only provide an error number from 1 - 9 to the 1/O Manager. An additional 
error number, 10, is reserved for use by the I/O Manager. When anerror 
occurs that requires return to system control, the DSR performs one of the 


standard exit utilities. 


D.2.2.6 SYSTEM ERRORS. Most I/O errors may require abortion of the 
user job requesting the I/O. Some types of I/O errors, however, are so 
severe that they endanger the integrity of the system. For these errors the 
DSR should halt the system so that the cause of the problem can be determined 
before the clues are destroyed. An available DSR routine, SCRASH, provides 
a standard method of bringing the system to a halt gracefully. This routine 
causes the CPU to IDLE. Information from the routine that called SCRASH 
may then be displayed. A sample calling sequence is shown below: 


REF SCRASH 


@LDM =ERINFO Load M Register with Address of Error Information 
@BRL SCRASH Call SCRASH 


(Continued on next text page) 
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ERINFO DATA 1, BADERR Number of Arguments, Address of Arguments 
BADERR DATA ERCODE Code that may be displayed in the A Register 
at IDLE. 


If arguments other than an error code would provide helpful information, the 
number of arguments may be increased. At IDLE the M Register provides 


a pointer to this information. See the DX980 System Operation Guide for the 
standard set of SCRASH codes. 


D.2.2.7 INFORMATION RETURNED BY THE DSR. The DSR on ily sets the 
Operation Ignored bit in the system set flags (PRB word 0, bit 3) aia en an 
operation is not implemented. The I/O manager sets all other system set 
flags. The DSR may pass device dependent information to the caller through 
the non-dedicated bits of the PRB. When passing information that requires 
several words, the DSR must use a buffer that is pointed to by the third word 
of the PRB. The operation code for this type of call is either 0,1, 2,3,19, or 
20. The DSR does not need to set or reset any indicators for the I/O Manager. 
The type of exit taken indicates a course of action for the I/O Manager. 


D. 2.3 I/O UTILITY ROUTINES 


The I/O utility routines perform common DSR functions with minimal coding 
in the DSR itself. By using the utilities, the DSR need never know the mem- 
ory locations of any PDT, PRB or LDT; furthermore it does not need to mon- 
itor character input and output buffer indexes. The DSRs use the exit utilities 
to ensure proper handling of interrupts and other types of exits. Failure to 
use the optional utilities creates increased DSR size, development time, and 
maintenance requirements. The I/O Utility Routines perform services fre- 
quently required by Device Service Routines (DSRs). The functions available 
are: 


PRB/PDT/LDT Bit Manipulation 

PRB/PDT/LDT Word Transfer (via register) 
PRB/PDT/LDT Conditional Skip on Bit 

READ/WRITE on 1/0 Bus (via register) 

PUT/GET Character from Packed Buffer (via register) 
LINKAGE to DSR Exit Routine 


The routines generate no task or system errors. All 1/O interrupts must be 
masked and the B Register must point to the PDT when using the routines. 


D.2.3.1 UTILITY ROUTINE INTERFACE, The utility routines are serially 
re-usable. The DSR need not know the location of the utility routines in mem- 
ory. When the DSR is entered by the I/O call processor or Interrupt Decoder, 
the S-register contains the I/O utility entry point. The routines are entered 
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by execution of an REX S, P instruction. To enhance DSR readability, the 
REX S, P instruction is defined as a new instruction, IOCOM, using the OPD 
assembler directive: 


IOCOM OPD C7C7,5 


A two word calling sequence is required to use a utility function: 


IOCOM 
OPERATION OPRI1,OPR2,....,OPR(N) 


The I/O Utility ENTRY/EXIT Routine transfers control to the correct opcode 

processor. This proces sor decodes the operand(s) and performs the function. 
On return to the DSR, execution resumes at the instruction following the oper- 
ation designator (unless a skip was executed. For skip instructions execution 
is resumed two instructions after the operation designator). No active regis- 
ters used by the DSR are changed by the common utility routines unless called 
for in the operation; however, the status register compare indicators are 


volatile. 


All general-purpose DSR's use the utility functions as much as possible, 
sometimes a special-purpose DSR cannot afford the added overhead of using 
the Common Utility Functions. To allow for in-line coding where necessary, 
the DSR is always entered with the PDT location in the B- register and the 
PRB location in the M-register. Additionally, the E-register is always 
zeroed when a DSR is entered. 


D.2.3.2 SET/CLEAR PRB, PDT, OR LDT BIT. This routine allows the 
DSR to manipulate bits within the PRB, PDT or LDT. The machine instruc- 
tion appears in the following format: 


) 45 67 1112 15 
OP CODE LOCA” | woRD NUMBER | BIT NUMBER 
Neen somal 


10=SKIP ON ZERO OO=PRB 
11=SKIP ON ONE 01=PDT 
10=LDT 


The assembler directives that define the instruction are as follows: 


BIT FRM  5,2,5,4 
SET EQU 1 

CLR EQU 
PRB EQU 
PDT EQU 
Oper EQU 


Ne CO OC 
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Therefore, the general form of the instruction becomes: 


SET PRB} 
BEL | : for , <word number>, <bit number> 
PDT 

For example, the expression: 


IOCOM 
BIT SET, PRB, 1,5 


changes bit 5 of PRB Word 1 to a value of 1. Also, the expression: — 


IOCOM 
BIT CLR, LDT, 0,15 


changes bit 15 of LDT Word 0 to a value of 0. 


The utility's execution time is between 26.00 to 29.50 microseconds. 


D.2.3.3 CONDITIONAL INSTRUCTION SKIP FROM PRB, PDT OR LDT BIT. 
This routine allows the DSR to inspect a specific bit of either the PRB, the 
PDT or the LDT and either skip or not skip depending upon the state of that 
bit. The machine instruction word appears as follows: 


fe) 45 67 11 12 15 
ee ee 
LOcA- 
OP CODE TION WORD NUMBER BIT NUMBER 
Veen _earmeranemmemrenanaes enema, arc 
1=SET BIT 00=PRB 
O=CLR BIT 01=PDT 
10=LDT 


The assembler directives that define the instruction are as follows: 


BIT FRM ‘55,2, 5,4 
SKIPO  EQU 2 
SKIP1 EQU 3 
PRB EQU 0 
PDT EQU 1 
Bor EQU 2 


Therefore, the general form of the instruction is: 
BIT eae 


PRB 
PDT} — ; 
oy ’ , <word number>, < bit number> 


LDT 


eee Es i a a 
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For example, the expression: 


IOCOM 
BIT SKIPO, PRB, 3,15 


indicates that if bit 15 of PRB word 3 is a zero, then the next instruction 
should be skipped. Similarly, the expression: 


IOCOM 

BIT SKIPI, LDT, 0,0 
indicates that if bit 0 of LDT word 0 is al, then the next instruction should 
be skipped. 


The execution time for this utility is between 27.50 to 29.75 microseconds. 


D.2.3.4 LOAD/STORE PRB, PDT OR LDT WORD TO/FROM REGISTER. 
The routine allows the PRB to transfer a word between a designated register 
and a specified word in either the PRB, PDT or LDT. The machine instruc- 
tion appears in the following format: 


i@) 4 5 6 7 8 9 10 11 15 
REG OCA rar 
OP CODE No. [tion [9a WORD NUMBER 
a W pa \eerreem ooo” 
100=LOAD , OO=PRB 
101=STORE O01=PDT 
1O=LDT 


The assembler directives that define the instruction are as follows: 


REG FRM  5,3,2,6 
LOAD EQU 4 

STORE EQU 
PRB EQU 
PDT EQU 
LDT EQU 


NF Oo MN 


The general form of the instruction is: 


PRB 
AD 
REG fee , <register number>, il , <word number>. 
STORE LDT 


For example, the expression: 


IOCOM 
REG STORE, A, PDT, 6 
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transfers the contents of the A Register to word 6 of the PDT. Similarly, 
the expression: 


IOCOM 
REG LOAD, M, LDT, 0 


transfers the contents of word 0 of the LDT to the M Register. 


The execution time for this utility is 20.25 to 23.25 microseconds. 

D.2.3.5 READ/WRITE I/O BUS TO/FROM REGISTER. This routine al- 
lows the DSR to transfer the contents of a register to the I/O Bus, or to fill 
a particular register from the I/O Bus. The machine instruction appears in 
the following format: 


4 5 10 1 12 13 1 


6 5 
-OIREGISTER 
OP CODE NOT USED On| NUMBER | 
a) 
TA 


1 
EN SS — 4 
1=WRITE 1=COMMAND 


The assembler directives that define the instruction are as follows: 


IOBUS FRM _ 5,7,4 
READ EQU 6 

WRITE EQU 
DATA EQU 
CMMD EQU 


mH Oo AI 


The general form of the instruction is: 


READ | DATA 


WRITE eo » <register number> 


IOBUS 


For example, the expression: 


IOCOM 
IOBUS READ, DATA, X 


transfers data from the I/O Bus to the X Register. Similarly, the expression: 


IOCOM 
IOBUS WRITE, CMMD,A 


transfers a command from the A Register to the I/O Bus. 


The execution time for this utility is 29.00 to 40.50 microseconds. 
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De2c3y6 <x DosR. 
handle the conditions that exist when the DSR is completed. 
instruction for this routine appears in the following format: 


This routine links the DSR to the proper routine to 
The machine 


4 6 7 8 1S 
rar 
ERROR NUMBER 
OP CODE Qu (SEE APPENDIX C) 
=) 

010 0000=NORMAL 
010 0001=ABORT 
010 0010=RETRY 
010 0011=DTERR 
010 0100=EOR 


The assembler directives that define the instruction are as follows: 


EXIT FRM 7,9 
NORM EQU 2016 
ABORT EQU ae 
RETRY EQU 2206 
DTERR EQU 2336 
EOR EQU 245, 


The general form of the instruction is 


Error number is ignored for 


{error number} 
NORM and EOR exits. 


EXIT { type j 


For example, the expression: 


IOCOM 
EXIT NORM, 0 


indicates a normal exit from the DSR. Also, the expression: 


IOCOM 
EXIT ABORT, 9 


indicates that the operation was aborted due to an attempt to execute an 
illegal I/O operation to the device (error code 9). 


D.2.3.7 PUT/GET. This routine performs character transfer between a 
packed buffer and a specified register. The PUT routine transfers a charac- 
ter from the right half of the register to the packed buffer and increments the 
PRB character count. The routine may also set bit 0 of the register to indi- 
cate that storing that character filled the buffer space. If the buffer space is 
already full, the routine sets bit 1 of the register to indicate that the charac- 
ter was not stored. The GET routine transfers a character from the buffer 
to the right half of the specified register and increments the output count con- 
tained in the first word of the temporary storage area of the PDT. The rou- 
tine may also set bit 0 of the register to indicate that fetching the current 
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character emptied the buffer. If the buffer is already empty, the routine 
sets bit 1 to indicate that no character is available. The machine instruction 
for this routine appears in the following format: | 


0 A Ses 12 13 15 
OP CODE . NOT USED SINT eae 


Vaviv 


01011=GET 


The assembler directives that define the instruction are as follows: 


CHAR FRM 5,11 
GET EQU Big 


The general form of the instruction is: 


PUT 


CHAR ee 


. <register number> 


For example, the expression: 


TACOR 


ANY WV ive 


CHAR PUT,M 


transfers a character from the M Register to a packed buffer. Similarly, 
the expression: 


IOCOM 
CHAR GET,E 


transfers a character from a packed buffer to the E Register. 


The execution time for the put and get utilities between 58.25 to 67.00 micro- 
seconds and 49.50 to 55.50 microseconds, respectively. 


D.2.4 PHYSICAL DEVICE TABLES 


A Physical Device Table (PDT) contains parameters, such as device ad- 
dresses and special attributes, that are necessary for control and perfor- 
mance of an I/O operation. Figure D-2 illustrates the format for a standard 
PDT and Table D-1 defines each of the fields. Device Service Routines use 
the PDT's for temporary data storage between interrupts. Each device with- 
in a system has a PDT containing information exclusive to that device. How- 
ever, one common DSR may be used to coordinate I/O operations for a group 
of identical devices. 
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WORD 


Oo NEXT PDT ADDRESS 


1 FLAGS 
2 INTERNAL DEVICE NUMBER COMMIT PRIORITY 
3 ASSIGN COUNT OPEN COUNT 


4 LOCKING LDT POINTER 


5 ERROR CODE svc INDEX 


6 DEVICE ATTRIBUTES 


7 
DEVICE 
8 
NAME 
9 


10 POINTER TO EXTENDED PDT OR EXTERNAL REGISTER 
11 1/0 LOAD FACTOR TIMEOUT 


12 DSR INTERRUPT ENTRY 


13 PRB ADDRESS 
14 LDT ADDRESS 


15 , 1/O DONE EVENT LINK 


16 DATA BUFFER ADDRESS 


17 UNSOLICITED INTERRUPT PROCESSING 
18 OUTPUT CHARACTER COUNT 
1 
: DSR 
| TEMPORARY STORAGE AREA. 
2 (VARIES FOR EACH DEVICE) 
(A)1 30248 


Figure D-2. Physical Device Table General Structure 
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Table D-1. Standard PDT Field Definitions | 


Definition 


PDT chain word, pointer to the next PDT. Zero in this 


word indicates that this is the last PDT in the system. 


Device Busy Flag - initially zero and set by I/O manager. 


3 Exclusive access/shared access flag set by assignment. 
Initially zero (shared access) by Job Manager. 


by 1/0 Manager. Initially zero (shared access). 


a] Locked/not Locked flag. Initially zero (not locked) and 


4 Exclusive access/shared access flag set at OPEN time 
| set by I/O Manager. 
| | 
| | 
| 


6 | ONLINE/OFFLINE status set by online processor. 
7 Not sharable/sharable attribute set at system generation. 
8 | Extended PDT indicator . When set, word 10 contains 
| | pointer to an Extended PDT for a central controller. 
| 9 RESERVED - initially zero. 
1 10-11 | System/user mode indicator - used only for system con- 
| sole data terminal by I/O manager and DSR to determine 
whether device is ina system or user mode. Initially 
zero. 
12-15 | DSR used flags; I/O Manager resets to zero at every 
| | initial DSR entry. 
a 0-7 Internal device identification nurnber - Each PDT has a 
unique number. Identification numbers 0-20, inclusive, 
| | are reserved and should not be used. All others are 
| | assigned according to table 2-2. 
8-15 | Commit priority - initially zero. 
3 0-7 Assign count, initially zero. 
| | 8-15 | Open count, initially zero 
4 0-15 | Locking LDT pointer, initially zero. 
| 5 | 0-7 | This byte indicates the operation status upon completion; | 


initially zero, it is controlled by the I/O manager and 


| | | DSR exit utilities. | 
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Table D-1. Standard PDT Field Definitions (Continued) 


SVC index - Determines which DSR is to be called. The 
value is determined by the memory image phase (MIP) 
containing the DSR, as follows: 


MIP SVC Index 
181 ee 
182 23 
183 24 
184 25 


Device attributes. Returned in the PRB when the device 
is opened, 


System console only 
Dummy device only 
Rewindable 

Device can ie forward spaced 
Device can be back spaced 
Printing Device 

ASR 733 cassette 

Data Terminal or CRT 
Disc 

Input 

Output 

USASCII Device 

Binary Device 

Polled CRT 


00 - Non-disc Device 

O01 - Linked Sequential Disc File 
10 - Relative Record Disc File 
11 - Indexed Disc File 


Device Name - This may be any valid USASCII 6 charac- 
ter string which has not previously been used as a device 
name. 


a a es 
D-14 Digital Systems Division 


(@) 
WO) 943005-9701 


Table D-1. Standard PDT Field Definitions (Continued) 


en 


If the Extended PDT flag is set, then this word contains 
the address of the Extended PDT. If this is a data bus de- 
vice and the I/O utilities are to be used, this word con- 
tains two possible device addresses. Refer to I/O Util- 


H lities description in this section. Otherwise, this word 
t 


is available for DSR use. 


11 0-7 I/O load factor. 


| 8-15 | Device Timeout - can be selected by loading value less 
than 255 into the timeout count byte of the PDT. Counting 

begins when an 1/O Call is initially processed. If a de- 
vice is timed out before the data transfer is complete, a 

| correctable I/O error occurs. Each count corresponds to 

| one second to allow a maximum timeout of 4 minutes and 

| 14 seconds. Some devices will require resetting the last 

| record. 

| 


| Keyboard type devices do not normally have a timeout. 
The timeout in the PDT's should be set to FF 6 to specify 
no timeout. 


LZ 0-15 | DSR interrupt entry - Initially points to a set of code that 

| performs a required task when an I/O operation is not 
currently being done to this device. Normally the only 
logic required clears the interrupt and returns control to 
the system. This word is controlled by the entry and exit 


utilities. This code may reside inthe Extended PDT or 


temporary storage area. This entry normally handles 
unexpected hardware interrupts. 


0-15 | PRB Pointer for the PRB currently being processed by a 
DSR. Initially zero. 


14 0-15 | Logical Device Table (LDT) pointer for the LDT currently 


being processed by the DSR. Initially zero. 


0-15 | I/O done event link controlled by the exit utilities and the 
system task scheduler. Initially zero. 


15 


16 0-15 | If the operation currently being processed by a DSR is a 
Read Binary, Read USASCII, Write USASCII, Write | 


Binary, Write Direct, or Read Direct, then this word 


| 
a | 
ie | 
a 
a 
Lae | 
| 


| contains the data buffer address associated with the oper- | 
| | | ation. This word is initially zero. | 
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Table D-1. Standard PDT Field Definitions (Continued) 


17 Same as word 12. 


18 Used by the utilities to maintain an output character count. 
Should be set to zero by the DSR at the start of character 
retrievals from the data buffer. Otherwise, this word is 
available for DSR use. 


This area contains any temporary data or device dependent 
information required by the DSR. 


Controllers that handle more than one identical device (moving head disc con- 
troller or magnetic tape controller for example) are not completely separate 
physical devices. Therefore, each multiple unit controller has an Extended 
PDT in addition to the regular PDT's for the separate devices connected to 
the controller. Figure D-3 illustrates the format for an extended PDT. 

Table D-2 defines each of the fields. The Extended PDT helps the I/O Manag- 
er determine the busy status of the controller and its individual devices, and 
also indicates which of several PDT's associated with the bus address applies 
to a generated interrupt. When an I/O operation is initiated, the I/O Manager 
sets the PDT pointer into Word 1 of the Extended PDT. The PDT address 
table contains a pointer to the Extended PDT instead of the PDT itself. When 
an interrupt occurs from one of the controller's devices, the Interrupt De- 
coders check the PDT Address Table to determine the address of the Extended 
PDT. The decoders then use data in the temporary storage area of the Ex- 
tended PDT to determine which device PDT is associated with the interrupting 
device. 


VARIABLE DSR TEMPORARY STORAGE 


(A)1 30249 n 


Figure D-3, Extended PDT General Structure 
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Table D-2. Extended PDT Field Definitions 


Must be PREF a6 


Active PDT Pointer - controlled by I/O Manager if the Extended 


PDT bit is set in the device PDT (Word 1, Bit 8). 


3 | Bit 0 - set to indicate controller busy. 
| | 
| Bit 1 - set to indicate a Silent 700 Series Data Terminal Extended 
PDT. Word should be initially set to zero. 
4 Pointer to Data Terminal PDT if Word 3, Bit 1 is set. Other- 
| | wise may be used as temporary storage. 
| 5 | Mode control for 733 ASR Cassette if Word 3, Bit 1 is set. 
| | 


Otherwise may be used as temporary storage. Initially zero. 


Bit 8 of Word 1 in the device PDT indicates to the I/O Manager that an Ex- 
tended PDT exists for a central controller. If that bit is set, the 1/O Man- 
ager retrieves the Extended PDT Pointer from Word 10 of the device PDT 

to access the Extended PDT. It then examines Bit 0 of Word 3 of the Extended 
PDT to determine if the controller is busy. 


D.2.5 LOGICAL DEVICE TABLE 


The Logical Device Table (LDT) equates logical device numbers to physical 
devices or files. Figure D-4 illustrates the table format. Table D-3 pro- 
vides a detailed breakdown of the fields. Job Management creates and de- 
letes LDT's. When an I/O call is made, the I/O Call Processor searches 
the linked LDT's for a LUN definition. If it finds the LUN, it prepares 


FLAGS 
_* PDT/FCB POINTER 


RECORD LENGTH 


NEXT LDT ADDRESS 
UTILITY POINTER 


Figure D-4. DX980 Logical Device Table Format 


(A°'130250 
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Table D-3. LDT Field Definitions 


Device open 
File 
Blocked 
Reserved 
Return on 1/O Error 
Busy 
Pass LDT 
Delete LDT 
Return on Retry 
Password - Owner 
Password Protected 
No Password Protection 
Temporary 

User/Creator Access 

Not Used 

Key length - for files only 
LUN 


Pointer to PDT for devices. Pointer to File Control 
Block for files. 


Record length 


Pointer to next LDT - zero if last LDT; Anchor is in Job 
Control Block. 


Pointer to Record Control Block for files. 


for either a DSR or a File Management entry, and relinguishes control to the 
correct DSR or File Management Routine. If it does not find a definition for 
the LUN, anerror condition exists and the I/O call cannot be executed. 
Open and close calls change the LDT Flags and Pointers as necessary. 
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D.2.6 DEVICE TIMING FACTORS 


Many I/O Bus interrupts are time-critical, whereas DMAC interrupts gener- 
ally are not. Two factors affect I/O Bus interrupt performance: 


1. The. worst-case time to service the high-priority device, 


2. The percentage of CPU time required to service interrupts. 


Dees el WORST: CASE ue BUS VERSES LATENCY TIME. The worst- 


eh h ty T/9 Bus device is the sum of the 


following: 


Factor Maximum Time Required 


1. The longest code sequence when inter- 
rupts can be masked. This occurs im- 
mediately after a previous interrupt has 
been decoded and includes set-up for 
DSR entry, DSR execution, DSR exit 
and return to the correct machine state. 400 microseconds 


2. Interrupt execution time that is a hard- 
ware function and does not add to the 
latency time. N/A 


3, Retaining the current state of the ma- 
chine and identifying the interrupt, plus 
setting-up for DSR entry. These fac- 
tors are controlled by the I/O Bus Inter- 
rupt Decoder. 40 microseconds 


4, DSR execution to the internal point of 
I/O is dependent upon the DSR being used. 60 microseconds 


Total worst case latency time to 
honor a high priority I/O Bus 
interrupt =505 microseconds 


Table D-4 lists the character interval times of some standard 1/O Bus 
peripheral devices. 


D.2.6.2 INTERRUPT HANDLING CAPACITY. The worst-case percentage 
of CPU time required by a I/O Bus device is calculated by: 


WORST-CASE INTERRUPT SERVICE TIME 


TIME BETWEEN INTERRUPTS. ae 


The worst-case percentage of CPU time required by a DMAC device during 
the actual transfer is: 


# WORDS PER SECOND X 0, 000075 
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Table D-4. I/O Data Rates and CPU Loading 


Maximum 
Character Time System Load 
(Worst Case) 
9600 Baud Modem 1040 4S. 
1200 Baud Modem 8333S. 
300 Baud Modem 3.35, 333 Os 
110 Baud Modem 100, 000 BS. 
300 CPM Card Reader 1760S. 
Moving Head Disc (DMAC) 
Model 979 Tape Transport (DMAC) 
DS330 Disc System (DMAC) 


High Speed Paper Tape Reader 3333S. 


High Speed Paper Tape Punch LS, SSS 
2310 Line Printer (DMAC) 


The worst-case I/O Bus interrupt service time is the sum of the worst cases 
of: 


1. Interrupt identification and DSR entry time (45 microseconds) 
2. DSR execution time (350 microseconds) 
3, DSR exit until interrupts are re-enabled (40S. microseconds) 


The total worst case time is 435 microseconds. The system can handle any 
combination of devices concurrently until the available CPU time is exceeded. 
The best performance occurs if the higher transfer rate devices are assigned 
to the high priorities. 


D.2.6.3 SYSTEM OVERLOAD PREVENTION. The maximum system load 
percentage for each device is represented in the individual Physical Device 
Tables. The I/O Manager routines monitor the system I/O load at all times. 
If an I/O call is made that causes the load to exceed 90%, the task is queued 
until more CPU time is available. Higher-speed DSR's are designed with 
system load in mind and frequently show a significant improvement over the 
worst-case percentages. 


D.2.7 CONFIGURATION LIMITATIONS 


The Model 980 Computer has four catagories of interrupts: Internal, Priority 
Option, Direct Memory Access Channel (DMAC), and I/O Bus. Internal inter- 
rupts are not directly related to I/O transfers and are handled as a separate 
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function. The I/O interrupt decoders assign the I/O Bus interrupts a higher 
priority than DMAC interrupts (this is different than the hardware priority 
assignment). Within the I/O Bus and DMAC interrupt levels, there is also 

a definite priority structure. I/O Bus interrupt handling has the greatest im- 
pact on overall system performance. 


Versions of the I/O Bus interrupt decoder support the following 1/O configur- 


ations: 
| Maximum I/O Ports With (Without) 
I/O Configuration Internal Expansion 
Internal Only 13 ( 4) 
1 Expander 22 (13) 
2 Expanders | 31. (22) 
3 Expanders — 40 (31) 
4 Expanders 49 (40) 


Figure D-5 illustrates priority the structure for internal expansion only. 
Figure D-6 illustrates the maximum I/O Bus configuration. The PDT pointer 
tables list the location of the PDT or Extended PDT associated with that de- 
vice. If less than the maximum configuration is used, expanders should be 
added in the numerical order indicated. Internal expansion may or may not 
be included. If an I/O expander is not included, its internal port may be used 
for an I/O device. Figure D-7 shows the DMAC expander table. 


The following equation determines the maximum number of ports per hardware 
configuration: 


(+ of expanders x 10) + (13 - # of expanders) 


D.2.8 DX980 CONVENTIONS 


Some general rules apply to all sequential I/O devices as well as sequential 
disc files. Devices capable of both reading and writing cannot arbitrarily 
switch between Read/Write modes. The restrictions vary from device to 
device. Do not close and re-open a device to circumvent these restrictions; 
the results are unpredictable and different for each device. All DSR's should 
ignore I/O opcode 17 and 18 to allow for expansion with new functions. Op- 
codes above 20 are generally inerror, although some are legal for random 
access to disc files and other device-dependent functions. For opcodes 0-3 
and 19-20, the I/O Call Processor checks for allowable data buffers. Use 
these opcodes for data transfer functions. Use opcodes above 29 for special 
functions that do not directly involve a data transfer. The basic functions, 
Open and Close are processed by all standard Device Service Routines. All 
sequential writing DSR's provide a command to write an end-of-file. For 
most devices this is a /* record. The end-of-file command should always 
be used in lieu of writing a /* for that purpose. 
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13 #14 15 


*-NOT USED - 


1/O BUS POINTER TABLE 


PDT POINTER (OR 0) 1ST PRIORITY 


PDT POINTER (OR 03* 2ND PRIORITY 


PDT POINTER (OR 0)’ 3RD PRIORITY 


PDT POINTER (OR 0) 4TH PRIORITY 


PDT POINTER (OR 0) 5TH PRIORITY 


PDT POINTER (OR oy 6TH PRIORITY 


. PDT POINTER (OR 0) 7TH PRIORITY 


PDT POINTER (OR 0) 8TH PRIORITY 


PDT POINTER (OR 0} 9TH PRIORITY 


PDT POINTER (OR oy 1OTH PRIORITY 


PDT POINTER (OR 0) 11TH PRIORITY 


* 
PDT POINTER (OR 0) 12TH PRIORITY 
PDT POINTER (OR oy 13TH PRIORITY 


*O INDICATES NO 
DEVICE WITH DESIGNATED 
PRIORITY. 


(A)130251 


Figure D-5. PDT Branch Table with Internal Expansion Only 
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PORT 1! EXPANSION WORD 


2.3.4 5.6 FB DAD ET 


12 13 14 15 Oo 1 


1/O BUS INTERNAL EXPANSION WORD 


ie] 1 2 3 4 5 6 7 8 ] 10 11 


PORT 2 EXPANSION WORD 


PORT 1 PDT POINTER 
TABLE 


[nor uses | 


8 


9 
PRIORITY 10 


NOT USED 
NOT USED 


BIT SET IN 
EXPANSION WORD 
POINTS TO 
CORRESPONDING WORD 
IN POINTER 
TABLE * 


23 45 6 7 8 9 10 131 


12 13 14 15 


PORT 2 PDT 
POINTER TABLE 


NOT USED 


19 
PRIORITY 20 


NOT USED 
NOT USED 


BIT SET IN 
EXPANSION WORD 
POINTS TO 
CORRESPONDING WORD 
IN POINTER 

TABLE * 


PORT 3 EXPANSION WORD 


23 4 5 67 8 9 10 11 


PORT 4 EXPANSION WORD 


PORT 3 PDT 
POINTER TABLE 


[nor uses | 


PRIORITY 30 


23 

27 
NOT USED 
NOT USED 


BIT SET IN 
EXPANSION WORD 
POINTS TO 
CORRESPONDING WORD 
IN POINTER 
TABLE* 


12.13 14 15 0 1 


WORD 


PORT 4 PDT 
POINTER TABLE 


37 


PRIC RITY 40 


NOT USED 
NOT USED 


BIT SET IN 
EXPANSION WORD 
POINTS TO 
CORRESPONDING WORD 
IN POINTER 
TABLE * 


| 


2 3 4 5 6 7 8 9 10 11 12 13 14 15 


ar er nna anata nas atansineoeenenemmmmmmntendl 


| 


* NOTE: 


12 13 14 15 
is) i?) 
e 


INTERNAL EXPANSION 
PDT POINTER TABLE 


f NOT USED 
NOT USED 
NOT USED 
NOT USED 
PRIORITY 41 


43 


44 


45 


PRIORITY 49 


NOT USED 


NOT USED 


NOT USED 
NOT USED 


GENERAL FORM FOR PRIORITY 


OF A PARTICULAR PDT {S 


GIVEN BY: 
10(n-1) + (W-4) 


WHERE 
n =PORT NUMBER 


W=POINTER TABLE WORD NUMBER 


Figure D-6. Priority Scheme for Max- 
imum I/O Expansion 
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D.2.9 DSR WRITING PROCEDURE | 


The recommended method for writing a DSR uses a defined, consistent struc- 
ture. The approach breaks up the DSR into unique processing steps. Each 
step is controlled by a branch vector, similar to the operation of a hardware 
state controller. The branch vector serves as the next state identifier. This 
technique is not suitable for all DSR's. DSR's that do not have several unique 
processing steps are inappropriate for this convention. 
.2.9.1 PREPARATION. Before designing a DSR, understa1 
how the hardware interface works. Research sufficient interface documenta- 
tion (usually available) to develop a familiarity with the interface. When de- 
veloping new hardware, design both the interface and DSR before constructing 
either one. Very often, a simple hardware addition can save a considerable 
amount of software, and vice-versa. In some cases, special features that 
look desirable when only considering the hardware may actually make the 
software more complicated and are best eliminated. 


™ 
iJ 


D.2.9.2 REENTRANT DSR'S. DX980 DSR's can service multiple identical 
devices with one copy of the procedure. A data base consisting of several 
I/O tables described earlier is required for each individual device. The 
DSR's also appear to service multiple devices simultaneously because when 
an I/O interrupt occurs, it is serviced very quickly for the interrupting de- 
vice. Once the interrupt service has begun, however, another interrupt can- 
not be serviced until the service for the current one has been completed. 


All registers and DSR local storage are lost between interrupts for a device. 
All data needed for a subsequent execution of a DSR is saved in a temporary 
storage area of the device's Physical Device Table (PDT). This temporary 
storage area is whatever size is needed by the DSR and begins at the end of 
those entries required by the I/O Manager. Do not save data locally ina 
DSR even when only one device is serviced by it. If a second device is ever 
added, the DSR will not work. Furthermore, PDT storage usually takes the 
same amount of code and memory as local DSR storage. Therefore, whether 
or not the DSR's appear to be reentrant, code them as if they were; with all 


data storage being done in the PDT. 


D.2.9.3 STRUCTURING THE DSR. First determine how many interrupt 
entry points will be necessary. To do this requires breaking the I/O transfer 
operation into its major components. This is not always an obvious decision. 
Hold the number of states to a reasonable level. 


For example, consider the high-speed paper tape punch interface. A write 
operation involves sending the requested data on a character basis to the in- 
terface. The DSR is initially in an idle state that clears interrupts and re- 
turns control back to the system. When an output request is initiated by the 
IO Manager, the DSR sends a character to the interfaces, sets its next state 
to one that continues sending characters upon interrupt, and exits normally. 
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ie ae 


*O INDICATES NO 
DEVICE WITH THIS 
PRIORITY. 


(A)130253 


Figure D-7. DMAC Expansion Table PDT Pointer 


When the DSR senses that it is about to send the last character, it changes 
state to exit the DSR with an End-of-Record exit. When this state is exe- 
cuted, the state is again set to idle and the DSR is exited. This procedure 
involves changing the state of the DSR several times. Upon an interrupt 
entry, the DSR only needs to clear the interrupt and branch via the next state 
vector. 


Figure D-8 and table D-5 provide a flowchart and listing, respectively, of 
the paper tape punch DSR. Following that, figure D-9 and table D-6 provide 
a more complex example, the data terminal DSR. 


D.2.9.4. CODING PDT BUILDER. When configuring the DX980 system at 
Initial Program Load (IPL) time include all the hardware configuration that 
is going to be used on the total system. This allows adding a device by 
adding only the PDT pointer to PDT branch tables since these tables already 
exist. The PDT Builder utility then has access to these tables using pointers 
and labels defined in table D-7. Figure D-10 outlines the steps required to 
add the new PDT using the PDT Builder utility. The remainder of this para- 
graph describes these events. 
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Table D-5, Paper Tape Punch DSR Listing 


SAP ROLE 

PYP NSR » INITIAL ENTRY SHEET fans 
AAGAL « 943117 
BAAS 
AABS « 
arpa ww TEXAS TINSTPUMERTS,ING, PARTHO4311789981 
O20" 
AAAe ww 
aaa? TNT IMPprTe 
AAAS. eRe R HEHEHE EO TE TET ORE REET EERE EE TEETH HEHEHE THREE ETRE ED 
APAD * 
BAIT -«# 
BAii @ TITLE s HIGH SPEFD PAPER TAPE PUNCH NEVICE SFRVICE R 
AQIS « 1TSPTP! 
@Ais 
QA44 «+ AUTHOR s FRNEST BONUGLI, 81/74 
AAI™ «# 
QAie « SYSTEM a AXQBA 
AALT ¢ 
AALB ww ARSTRACT THIS RNOUTINE PROVINES THE INTERFACE 
AC1S « RETWEEN THE PAPER TAPE PUNCH CFANTROLILER 
AP2? « AND THE OxOaA SYSTEM, 
AAS! # MAJOR FLINCTYONS 1) THE HYGh SPEED PAPFR TAPE PUNCH 
BA22 -«® ASR PUNCHES DATA ON & LEVEL PAPER 
apes TAPES IN AN ASCIT, BINARY, OR ATRECT 
ACQL & MONE, 
“72% 2) ACSTT RPECORDS ARE WRITTEN AS NNE 
“P20 FRAME PER FRARACTER, THE DATA 
AGay « PUM@HEN NIRECTIY FROM THE RATA BliFe 
arek& FER WITH NO CORVERSIONS, 
APES « 3) FACH RECORD 8 TERMINATED WYTH A 
gasr RPEANER OFF CHARACTER (XeNFF) AND 4 
wast * MELETE (PUROIIT) CHARACTERS, 
ase «# 4) BINARY RECARNS ARE PUNCHED 28 FOUR 
BP3% FRAMES PFR WORK, 
YASL @ §) AN WRITE OFRECT NO END OF RECORN 
GA3S INDICATOR JTS PUNCHED, 
“VP3% ww ERRORS NO Ptinf@ ke ERRORS ARF METECTAALE 
we37 APFRATINN COME ERRORS ee ABNRT 
“ase of 
YASS ww TNPYT a THE FOLLOWING ARGUMENT 8 PASSED 
ABA” « 
Anat ® (POT@, INITIAL/CANCEL ALL YNDICATAR) 
AA&S « 
ArAy »® 4LL ASR AN A CALt TN TSOSRY TO ORTAIN THE 
A%4L ¢@ FOLLOWINGS? 
AAAS «& Fsa 
AO af, * Mae PRR @ 
AE? ¢& R = POT @ 
AASB « A ANT ¥ #8 APFRATION CONE 
AA49 e S a 'ITYILITY ENTRY 
QAS™ RRANC H INTA INTTTAL AR CANCEL FNTR 
A514 * 
AMBD @ NUTPIT z HONE 
“asy 
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Table D-5, Paper Tape Punch DSR Listing (Continued) 


SaP RAL 
PTP JSR w INITIAL ENTRY SHEET aaaAr 


akek 4 
ah he by) 
Aase 


# ROUTINES 
t 
* 
O57 «# SVCS USED ® NONE 
2 . 
@ 
® 
® 


MALLEO =e T/f HTILITTES 


2058 
Wass 
ABBE: 


A614 RRERRARHEWEHEHERERPEETERPARHEHREEREHERHEKET HHH ERE YY 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 


$aP RALC 


PTP H&R w INITIAL ENTRY 


ere! 
YABd 


AAA4 
ae Be 
AGA 
AAAS 
AeA? 
“BAAD 
Bans 


GORA 
Aras 


PAAK 
vaa7 
BABY 
Aaa 


“naa 
ROAR 


waar 
aegéa 


Ane? 
aA6S 
Ty 4 
AA6E 


BOGE 


Q2A67 
ABR 
AAKBS 
HAa7e. 
aa74 
B72 
Aa7s 
AAV’ 
AATE 
aaze 
QaA77 
AA7R 
ears 
vrean 
angi 
AMBD 
AGA 
AMBS 
Aras 
aoae 
Ana? 
AMAR 
aves 
“ager 
aegs 
aage 
uagy 
QAa94 


SHEET aaas 


RERAHEEHHETRERAHEHHE TRAP AWHHERHTEHEARHERHEHEHERE RE EEET EY 


REPRE HSEHEEHRERERERHHEHERERERATHEHHHEWHHYERERERHETEHEEEDEY 


PEJ 
REF ISD8RY 
NEF ISPTP 
@ 
* I/O UTILITY FOUATES 
# 
YOCOM OPN »2C707,5 
ABORT FQU >?P1 
OPDERR FOU 9 
ArT FRM §,9,5,4 
SET FQU 64 
CLEAR FQ! G@ 
POT Fou 4 
PRB FQU OA 
LAT FQU 8 
SKIPA Folt 2 
SKIP] Eau 38 
REG FRM §,3,2,6 
LAAN Fal 4 
STORE FA! § 
mais FRM 8,7,4 
READ EQ 6 
WRITE FOU 7 
DaTa Fauooa 
CMMn Fi of 
CHAR FRM 58,11 
PHT FOll A 
GET Foul >A 
EXIT FRY 7,9 
NORM FOll »2A 
FOR FQIl 294 


a LEE 
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SAP ROLE 
PYP nSR 


AYE 
ADA 4 
AAA?P 
ANAS 
UMA 
AAR 
ASA 
Vea? 
vere 4 


AAYL 


ACA 
unras 


IAs 
ANA? 


AAA, 
BrAF 
ar12 
APL? 


AALS 
AM {4 


2200 
0180 


89°07 


a a a ey Se ee eT Te SL ee 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 


° INITIAL ENTRY SUReT? eda 
args PES 

AAQGE, PTET EEE OTTO NETO EEO EHTEREEEHEHEEH ETH EEE EDEN 
AGQOPF -« 

AFOR ww PERISTFR ENUATES 

AA9S « 

ALA? WERE HOTTER THERE OH ETHER EHH EEE HEHE TREN E TE TERED ENE OE EY 
AAT A Fou 4 

ALAS E Fat: 1 

vyas xX FQI' 2 

WIAS M FOI! 3 

V1Iae § FOU 64 

AIAG L. FQi § 

Atay BR FQU 66 

AI@BR OP FOQli 7 

¥1iAal BR Fati 4 

dyvie leh did hhh deh hh hh hd EPP EAL ELISE EETTLILL ATE TTT TT 
be * 

41if ww PRR 

Ati% 6 

AILS COTE O RHEE HET ERE RE EHH HERETO T HERE ERE HERERO EE HEHE EEN Eee 
AY1® PRRSFI FAI a SYSTEM FIAG WORD 

“il€ 

A{17 PRBFOF FOHI' 2 EOF SYSTEM FLAG 

AL18 PRBNPT FOI 3 OPERATION YGNNRED Fi aG 

A119 « 

W120 PRBNMPC FQU {ft APERATTION FORE (RIGHT HLAF) 

0121 PRBNRL FQ 2 NATA RECORA LENGTH 

4122 CRORE REET RHE H EET RHEE TERE HEE RHE EHH EEE HT EE EEE EH EEE 
A12% 

AI2£ ww PHT 

012" 

a12¢ RET EHE RHETT RTH EEE HEN EH HEHE ERT HE RET EHH EERE RHEE ERE Eee 
AY27 PNTFLG FQ! 1 FLAG WORD 

4128 « 

0126 OMTRCTP Fol 1% AYREET PUNEM BATT 

AIST @« 

At3t OQUTCNT Fat {A OUTPI'Y COUNT USER RY UTILITIES 
“132 TEMP FAU 8618 

W135 TEMPY EA 19 

AL3é VECT EQU 2a WRITE VECTOR USED ON INTERRUPT ENT 
Aa13$s \ A idee edhe hhh bh hhh hhh PPP AP PLEASE LA LTE LILLE TTT TTTT 
B13€ « 

Ai37 © WRITE COMMANDOS FOR PTpP INTERFACE 

8138 

AaL13¢ WHORE THERE EERE ETH ETOH ERERHAHEEHH HUET RED EHHEEE ENERO R ENE HERE 
aia4e weorse FOI! pagae AISCONNECYT OFVICE 

Bia WCENIN FQL paiaa FNABLE YNTPRRUPTS 

A{(4e CHEETAH ETEET AREER EHO ETE DERE ETH EE ET ER HEE TERETE ERED 
A143 «@ 

9146 «# CONTROL FOR ENFFOR SURROQUTINE 

A145 

O146 PETA H RETO EE RH OTHE REET ERE EERE EE SHR HHEEH THERE HEHEHE RHEE EES 
A147 


WrEQF EQU 7 


oO 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 


SAP ROLE | 
PTP DSR @ INITIAL ENTRY SHEET 9905 


a088 0148 WTEOR FO! 5 . 
a14¢ REND PTP DSR @» INITIAL ENTRY 
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Table D-5. 


SaP ROLE 
PTP OSPR © IAITIAL ENTRY 


Ass PES 
AVS] CRORE EEE THERE TH ER TE THEO EERE TEETER RETEETENHEHEHRENENEES 
A15f «¢ 
Vi355 « A, » DFTEGMINE TF LFGAL OPCADF, TAKE ERRNAR PATHE YE NOT 
i582 «*« B, = BRANCH VTA BRANCH TARLE ACCORDING TO OPCNDE 
415" « 
VBE LM REPEC ESE CSCIC CEL CSCSSLICSICCLCCTICCCTCTC CLT ELT TTT TTT TTS 
arae aiS7 YSPYP FOU & 
VAAA CSS “iS8 RMN L,A SAVE SVC RETIIRN @ 
O741 7aaAre At$$ @BPL ISNSRT INITIALIZE SUR PROGRAM 
aoge 
X @AA2 ABA | 
P O793S FBS 416 NATA INTERR INTERRUPT FNTRY ADARESS 
P BAA4 AMZH A461 MATA CANCEL CANCPL ENTRY ANDRESS 
GAAS {ROP 7162 @LNM sWCENTN FNABLE INTERRUPT CANTROL 
BAAR BAiBH 
GAg7 CIYC7F ai16y roco™ 
CAAR 3813 81664 TORUS WRITE,CMMD,M 
BAAS CI7C7F A168 TOCcoM 
QAAA 31S 164 TORUS READ,CM¥MN,é 
BAAR BFIiS 6167 CPA #819 
@nar ¢nhea «a168 SGE 
QAAN FRIN A169 BRU OPCNER 
BAAR 4901 @17¢. LOX $42,%x 
Q@AvF C527 0171 RMN X,P 
P BALA AAAPR 0172 DATA OPCHER @ READ aSCTY 
P @A1t @a2B8 A973 DATA OPCNER 4 REAM RINARY 
P BALA BA4E 8174 DATA WTASCY 2 WRITE ASCIT 
P @AL3 GA6& A178 DATA WTBINY 3 WRITE BINARY 
P GA14 @F°2R A176 PATA OPCNER 4 REwInND 
P @A15 @BA2R B177 DATA OPCNER 5 BACKSPACE RECORD 
P BA1h AP2R 86178 DATA OPCDER 6 FORWARD SPACE RECORD 
P BA17 BA2R B179 DATA EXTEOR 7 OPEN 
P GALA AALP B1BF PATA LORTRL & OPEN REWIND 
P BAIS BAZ6 81814 DATA EXTEOR 9 CLOSE 
P BALA AA3i 8182 DATA CLSWEF 1” CLOSE WRITE ENF 
P @A1R 8931 4183 MATA CL8WEF 14 WRITE EOF 
P BA1C 8026 9184 DATA EXTEOR 12 CHANGE RECORD LENGTH 
P BAIN B8A24 0188 DATA IGNOR 13 READ NEVICE srTaTtus 
P CALF OF28 918€ DATA OPCNER 14 BACK SPACE FILE 
P @A1F BA2R 8187 DATA OPCNER 15 FORWARO SPaCce FILE 
P G820 A924 8188 DATA IGNOR 16 UNLOAD 
P 8921 @824 0189 PATA IGNOR 17 UNASSIGNED 
P BAZS B924 8190 MATA IGNOR 18 UNASSIGNED 
P 8423 8940 0191 DATA DIRECT 19 WRYTE OTRECT 
8192 HED PTP OSR 
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SHEET 


AAR 
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$aP ROLC 
PTP OSR 


@u24 
#Aa25 


HAQK 
P 4927 
aae8 
@a29 
QADh 


GAR 
¥A2c 
@aen 
AAQe 
wAaFr 
“aga 


wast 
@vug2 
P Omg 


Table D-5. 
A19% 
QPQ4 @194  YJENNAR 
C7Cy a19o8 
28G3 a196 
are 4iS7 CaNnteL. 
VAZE 4198 EXTEOR 
AGA A19¢ 
Ba75 
B1i14 agar 
C7C7 82@1 
488A AAs 
WA2R AGAaL NOPCNER 
“Par wens 
A2aG 
C7C7 «ease 
Bair  Aeve 
C7C7 a2e? 
42290 ADA 
@431 aeac CLSWEF 
1707 Aerie 
QAAe WPit 
AA4D 
Age 


PEJ 
Fou 
TOCOM 
BIT 
EQu 
FOU 
LNA 


STA 
TOCOM 
EXIT 
FOU 
OLOA 


Torge 
TORUS 
TOCO™M 
FXTT 
FQil 
LnyY 
@Lne 


HEP 


Paper Tape Punch DSR Listing (Continued) 


SHEET ana7 


SEY OPPORE IGNOR BIT 


SFT, PRB,PRBSFL,PRACPI 


§ 
asFXTNRM 


VECT,RR 


FXTT ON COMPLETYIAN OF REQUEST 


FOR,® 
§ 
zWCOISC 


WRITE, CMMDVA 
ARDORT, NPRERR 
$ 
aWTFOF 
BLORTRPL 


PTP NSR w WRITE ENF/EDR 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 


gaP ROLE 
PTP SR © WRITE ENF/EOR «SHEET gape, 
v7’ PES 
VOUS eRe R REE RENEE EERE TEER HEHE TH EHR TEETH EHH EERE RE EEE 
@?18 
APPLE *#YNPUT TS EsnexT FNTRY VECTOR ANOY#9 TF FOR OR Xead IF ENF 
AQI7 w A, = SET VECTOR TO TVPTPY 
AO1iB « B, @= GET CHARACTER 
voi19 eC, © IS IT LAST ONE TN PINCH? ES THEN TO TO F 
yeam o«# D, & OUTPLIT CHAPACTER 
4221 w E, = FXIT NORMAILY 
920 w« FL = SET VECTOR AS SPFCTFIEN ON ENTRY 
A222 
D226 OME RENEE EERE REET HORE TERE ETH EREH EH HEHEHE ETEK TERE E EEE 
ve36 A225 ENFFOR EQ! & 
UA5S4 BSIS Y22F STE TEMPY,BR 
e755 agree A227 @LNA BYVPTP4Y 
Pp AADA vaso 
OAS? B114 A288 STA VECT,AR 
@A38 9117 8729 STX¥ TEMP,PR 
QA3Q aear IVPTP( EC! & 
VASO 1112 B231 LOX TEMP,RR 
WASA BASF A232 LOA ENF,X 
YA39R C7C7 8233 Toco™ 
QA3C B3RAR BASS TORUS MRITFE,NATA,A 
WASN 4912 A238 AMT TEMP,RR 
WASE FASE B26 BRI! FXTNRM 
BASF 41143 8237 LOX TEMPY,BR 
BAA 9114 8938 STx VECT,AR 
OA4{ FRESE BOSE BRU EXTNRM 
a24e HEN PTP DSR = PINCH LEANER/TRAILER RONTINE 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 


SAP RALT 
PTP DSR © PINCH LFEANEP/TRAILE® ROUTINE SHFET aaagd 
ee Bt PES 
APES eR AEH REESE HERTHA RRERH ETA H AHERN EHEHERH TE HERETO 
a24y% 
A944 «# A, =» SET INTERRUPT VECTOR TA ENTER AT BR 
474% « SB, = PONE IT tue TIMES? YES YHEN 46 7S #F 
W246 « C, = PUNCH A ALANK 
A247 w DO, = FXYT NORMALLY 
2248 « E, = RISCONNERLT NFVICFE AND FXTT ENR 
U?4o « 
APS TRO REPEC EEREREESASAEE CEES ES ERS SESE EERE ESC ESE CECE SEER SS 
@€449 A254 \LORTRL FOL 8 
0449 BPA AOE. 1A ZTVPTPO 
P HAAS APE? 
W948 B144 UAsKs STA VFCT,&R 
WA45 ATH4 BAHS LDA sian 
YA4B Bie aess STA TFEMP,RR 
vOCO67? weSe IVPYPS FO! § 
GAG 494272 987 OMT TEMP,RR 
“qe JAAS 4v?S8 RRIi $42 
A469 7ROC AHS RRI' CANCE! 
OA4A C7CFY UPbe TORO™ 
W2A4R BRA APB4 TORUS WRITE, NATA,E 
044% FROR YWoBS RRIt EY TNR 
A263 HEM PTP NS aw WRITE ASTITT 
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SaP ROL 


Table D-5. 


PTP )SR w» WEITE aASCTT 


wad 


ViAGgF 
P WU4F 
wasn 
Basi 


we§o 
WASs 
Wasa 
Bass 
UAS& 
P “AS7 
Base 


“Wasa 
GOSA 
was” 


BASE 
wagn 
Base 


Case 
Bega 
P A264 
wA62 


“vaan 
5193 
VO4F 
ange 
uns 
8144 
BO1? 
“nso 
c7C? 
5RUC 
DRIP 
TARAS 
ARAe 
wase 
agLé 
eos 
c7C7 
saan 
7A4Q 
aese 
ares 
DROF 
7&C7 
AOSF 
1708 
arao 
QaAQEK 
7ADS 


v2hs 
APKS 
NO6F 
A?67 
w2#8 
A26% 
a27? 
Ag7 4 
W272 
AA7% 
WP74 
A278 
A27¢ 
a277 
4278 


a27¢ 
A2BC 
A2a4 
Ura? 
v282 
W284 
428% 
AaBE 


A287 
02°88 
42BS 
a29% 
¥291 
urge 
Hoos 
a29¢ 
H29% 
aege 
A297 
u2gos8 


0299 
ASAP 
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®HEET anya 


PE! 


SERA KHHEREPEREREHESEHEHTEREHEREHEHETER EH ERATE ETEEN EES 


*¢ e+ @ © ¢ @ 
AMOO Ft wp 
ee ee ee ee ee | 


* 


SET VELTOR 

7ERQ PRT ONTPUT COUNT 

BET CHARACTER 

TS IT LAST CHAPACTFR TN WRITE 2 NN THEN GO TA F 
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eee S) H 
1 H 
RETURN Boren e enn nnn == * 
| aeletatehattetaied > 
FMTRET 
eee 
7 ‘ 
eee i 
RETURN 
Won teaseclscoeosees 
FMTFF I 19 
¥----------—- -- = = * 
H 
5 (XMTCHR} H 
. SEND FORM-FEEO H 
fe) H 
L 4 
e--~------ ---- ~~ —t 
RETURN 
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enn e 


OC4 
(LINE FEED) 
LF 
CLEAR EOL 


$ande ce Tccaseenencnae 
(FORM FEED) 
LF 


Le 
LF 
(3 LINE FEEDS) 
LF 
LE 


(HOME CURSOR} 
HOME 
CLR EOL 


Bene we ee 
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Table D-6. Data Terminal DSR Listing 


SaP ROL 


QAQ@A DATA TERMINAL BEVICE SERVICE RNUTINE SHEET ana1 
agai #CREATE TOOT,SAP,'NATA TERMINAL NSR!, 
2eae Int ront 
Ama’ HED GBA DATA TE@MINAL DEVICE SERVICE ROUTINE 
AAAL «@ 
@G@S « TITLESTOOT © GAGA SATA TERMINAL DSR 
AABE «# ; 
A9G7 «» AUTHORSWAYNE DOWNAL, 
AAAB « o,' | 
Q@aA2G w REVISTONS&SNN REVISTONS 
BAin 
@°11 © COMPUTERS 98@4,S8AP 
G12 «© 
a@Ais « AnsTRACTs THIS 18 THE DFVICE SERVICE ROIITINE PRAVINING 
amtg « THE NECESSARY INTERFACE BETWE N THE DATA 
amis « TERMINALS TTED TO COMMUNICATIAN MODULE 
OBA1E AND THE D¥98@ SYSTEM, 
AAtL7 
O18 « DETAILED NMPERATIONAL AOCUMENTATION 1S SEPARATE 
Q°19S « 
2Q2% « STATISTICSRTHE MAXIMIIM PATH WITH INTERRUPTS MASKED Is 
@A21i @« 7727? JS, PLUS TIME FOR THE FOLLOWING UTILITY 
a020 f FUNCT IONSS 
Qa23 «+ 
AAPL « 
QA2% «& 
A026 HEN DATA TERMTNAL DSR e@ GENFRAL EQUATES 
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Table D-6. Data Terminal DSR Listing (Continued) 


SAP R2°9LC 
NATA TEPMTINAL DSR w GENFRAL EQUATES SHEET an02 
AAQ?7 PES 
PROS COREE ERE RE RRR EE THEE ETE REDE HE HRER ER HENNE EEEHEEHE HED 
AAES * 
AASe * EXTERNAL REFFRENCES AND REFINE TIONS 
AFSi «# 
AASD WRU H OEE HERE HEHE REE HEHEHE TERE RH ERE TERE ROE EEE ES 
Gasy -« 
ARSE PEF ISNSRT 
BASSE AFF YSNT ENTRY POINT 
aasze REF ICCHAR CONTROL CHARACTER ROUTINE 
AMSy « 
AOSR COWRA ERE HERTHA TAHT ERE ENE HEHE R HEH ER ENTE TERE RED 
AAs’o # 
AA&? T/N UTILITY FQUATES 
ARS] ® 
VASE RHR R EER EERE RET HER ERR EHO E HE ETEEH EE TERETE ETRE EERE HE 
arama 
AA4L INCAM APH C7C07,5 
aga® srt FRM §,2,%,4 
VAAL AAse SFT FAQtt 
wage AAA? CLEAR FQI! 
PAAt pada PNT Ft 
YaAA AA49 PRB Fil 
aeae aese LOT FQu 


PPB wASi SKIPA FOU 
AAAS YUAHD SKIP FAL 
aosy% REG FRM 
AAAS BASS LNAN FQU 
aeasS gas® STORE FOI 
vase IBIS FRM 
AIAK AAST7 READ FQui 
AAQ7 @ASH WRITE FAI! 
“AAG BARKS HATA FQl! 
AGB? CHAR FRM 
APAA ARAB PLT FQI! 
“PAR aase GET EAL >A 
“A6yS EXIT FRM 7,9 
VA2F BABL NORM FAL! »2A 
w%24 OF68 EDR EQUI 3294 
B22) ange aBORT FQU »21 


JASN AAA AURANN TD“ De 
= 
Gi 
= 
~— 
= 
a 


Vv 

Pe 
~~ 
—_ 
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Table D-6. Data Terminal DSR Listing (Continued) 


SaP ROELC 
naTa TERMINAL OSR «» GENERAL EQUATES SHEET agas 
QA67 PEJ 
vA68B rrr rrrrrrrrrrrrrri cri rr iti c ii tees elt ELAS Leki 
ae6o «# 
AaAaye PRR WORD ESUATES 
AFL « 
PA7E re rerrrrrer rr TT TTrTTror irre e ree h Eh heh eile 
aa7ys% 
vaan @u7e PRBSFL FOU 4 PRR SYSTEM SET FLAGS 
veai @ae7® PRBUFL FO! ft SFR SFY FLAGS 
aagi aave PRANPC EOU 1 T/N NPCOHE (RIGHT HALF) 
A929 @a77 PRBARL FQ 2 NATA RECORA LENGTH 
e2g3 OATH. PRANABA FQU 38 AaATA RFEFCORN LENGTH 
AG7TS * 
AAR REE E EERE MERE EEE REET E HORT EEE TE HEHE HAE E EET EH EHH ERE HH ANS 
gasi * 
AaaBS PRR FLAG BIT EQUATFS 
yaay 2 
AARSL ORR EERE EEE TERRE RETRO RHEE ET ETE HEHEHE EH HOARE H ERE ER ESS 
GABE f& 
aavo areae PRBEOF EN 2 FENN OF FILE 
gaas woreazry PRANPT FOU 38 NPFRATYTON TENOREN 
yaat uase pPRBNWR EQU 1 AUTPIT wWiTH REPLY 
goa? aves PRBATM FGI! 2 ALTO RECORD TERMINATE 
gaa3 ange PRBFAC FOU 3 FORMATTED ASC IT NUTPUT 
vee4 angi PRBSCR EQU 4 SURPRESS ALITA CReLF AN INPLT 
gaps aage PRBSBL EQ 3 SURPRESS BFLI. AN YNPUT 


J’Agy 


I nn Ee 
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SAP ROPLC 


Nata TERMINAL DSR «w GENFRAL ENUATES 


Aaa 
APTS. 
AAT 
4 
ANY A 
wigs 
aA? 1é 
“rit? 
ARrLR 
vAyT9s 
AT YA 
VALR 


waar 
araP 
Aran 
v7Q4 
args 
“urne 
AAA? 
AVE 
VFA 


APQ4 
Hage 
AAQE 
“vYAQ?7 
BOR 
vaAge 
Atac 
VIA 
ata? 
way 
ALASL 
ALtLAe 
ALTA® 
Uta? 
~LAB 
“wiae 
Aq? 
aqdq 
AaY{s 
OI1% 
YLi14 
AIL" 
AIG 
att? 
A118 
ali¢ 
aac 
¥vi2i 
vi2?2? 
vias 
A124 
A128 
A12¢ 
A127 
“128 
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Data Terminal DSR Listing (Continued) 


SHEET ana 


FES 
PRR REEETTHAHTESEEREKEREETE HERE EERHEAHHEEHEAEEKHE HEE REDEREKEY 
* 
* POT WORD EQUATES 
* 
SPRUE RTH EKER ETERS EER EREHEOUTERHENREREHHEEH HEE RTEER HH e ees 
* 


POTFLG Fat f FLAGS 

PATPRR FRI! i3 PRR ADDRESS 

POTNBA FO 16 MATA BIIFFER ADR 

PATOCT Fi q{R NUTT COUNT 
POTMXN EQ! ae PA MAX CHARACTER OUTPUT/PECORD 
PNTSTA FQI' 21 TNITTAL STarTi's 

POTRVEC EQ 29 READ VECTOR 

PNTwVF FOI 2A WRITE VECTOR 

TEMP{ FOI 24 TEMPORARY STORAGE 

TEMP2 FOI! 2s TEMPORARY STORAGE 

TEMPS FHI 26 TEMPORARY STNRAGE 

POTNMEV FRI 27 MEVICE OFSCRIPTION 


* 
TRE RR ESOS ERC S SESE LOS OLE ERE EES ESERIES CEES CREEL EEE ES ES 
* 

* POT FLAG BIT ENUATFS 

* 

TORE RR SESESESESCAS OLE ER ES ERE EEE SESE E TSEC EEE S| 
* 


PNTRSY FOU @ MEVICE BI'sy 

POTLFE Ful! 2 LF BEFORE ECHO AFTER BS ATT 
PATLFT FO 3 TGNORE NEXT LINE FFEN AIT 
POTFFH FQI' 4 HOME ON FORM FEEN ALT 

POATINL Foti § ONF NULL AFTER CR AIT 

PNOTRCK EQI! 6 RACK SPACABLF PRINT HEAD RIT 
PATILFAa FQI' 7 AUTO LF ON fFARRIAGE SIZE RIT 
POTLFR FOU {4 LINE FREER REFORE ECHN AIT 
PNTAWR FOU {5 NUTPLIT WITH REPLY IN PROGRESS 
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Table D-6. Data Terminal DSR Listing (Continued) 


SaP ROLE 
Nata TERMINAL OSR «» GENERAL FOQUATES SHFET fans 

“yes PES 
ALS wee RHEE HE RET HEE HEHEHE HERES EH ERE EREREREEEY 
¥131 « 
a13f RERISTFR ESUATES 
413% «# 
am BOY ME PRES E SESE SES ES SSESESEOESUTESCSESOCLELOESCLOCCTSCALSESELT Eee 
413% 

APA AL3" A Fou & 

aval ai37 ec FAQU 4 

APAD ALlSA XX FOuU 2 

UAaS BI3G M Fol 3 

AAAR w“l4ae™ L FOU 8 

APPAR W1al R Fall 6 

GV? AL4E P FOU 7 

Pras 414% BR FQ! i 
“344 
B14 ee EEE RE ETERE TERETE HEREE HERE ENR ETE EES 
A14¢) 
AAT ¢@ CHARACTER FOUATES 
“i448 e¢ 
vgae SEP EREREREEHEHERE RETA ETEE HEHE TE RHEE HT EER RTH E EY 
ais? * 

aeqF AISt CLR FQ >{F . 

VO{A ASS ECURIIP FOU DtA CURSAR UP 


APA® AIST NULL FQL =a 
AMAP VI5L HOME FQt' >a 
Q°A7 WIS" BFLL FOL = >Aa7 
UPAR WISE RAKSP FOI Aa 


AABA WIS7 LE Fol! >A 

“FAC WISH FF FOU oe 

argr AatSS CR EFQI = »>ANn 

vrin7 w“l6r OLE Foil >14 

APTA Al6t ora FOU 214 

aFei7 wi62 CLRLIN FOL! 3»47 CLEAR LINE 


WASA AL6S RACAN FU wdA 
@A§C 4164 BKSLSH FAI! >SC 
QOSF B1KE BCKARR EOI! D>SF 
HWA7F vShEe RIBOT EQU >7F 
¥O6BO A167 TAB FQt  »Rg 
AFAA A168 ENDFIL FAI! DAFA 


i ee ee 
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Table D-6. Data Terminal DSR Listing (Continued) 


SaP RALS 
NATA TEEMTNAL 


ASat 
veer 
AAP 
ACAF 
AMAF 


“Aan 
AFAa 


rr Lt 


NSR «w GENFRAL EFNUATES SHFET anaes 
VLBE PES 

PATO ee RE RETR ETRE ETHER EEE RHEE EHET ETHAN ERETEH RHE HET E DEE 
NIP 4 * 

vi7ze HUTPIT FORMAT FONTROL FLAG BTT EQUATES 

a17% « 

iO SSPE PR RER ESE RSESESSESEOEES EER ESE REE RES EERE RSE SEARS ASD 
A117" 

vi7e PNSFR™ FOL! 1? FORMAT AFTER RECORNA 

A777 CRFARM FAL 18 CAPRTITAGE RFTURN 

At7& LEFORM FOU 44 LINE FEEN 

At7sS FFFORY Fil 18 FOGM FREER 

AIRE LFQFRM Frit 15 ANN LINE FEEA 

Aq 84 * 

AYRE SERRE KERERHHEHERE RESTO HRERE REHEARSE HREREHETREH ERE KETES 
AqGRy w 

AYRES * NTHER FOLUATES 

via® « 

Aiee SECS EAE RATER A HEC EH ERENT RHE ROKER EN ERE TEER 
AL1Ra7 «& 

¥9IBR LOATNPC EQ! J 

aqyac ILLOPR FAI Q ILLEGAL CPFRAYTTON 

aigr ® 

AIQ{ HER ATA TERMTNAL NSR &© I/O CALlt. ENTRY 
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1 


SaP ROLE 


Nata TERMINAL 


Baan 
AAAI 


Yaa? 
VaAs 
WAAA 
eaay 
WAAG 


CU sx 


UvVA? 
“Aan 
aya 
QAAA 
AAA 
paar 
BaAN 
WAAF 
AMAF 
way 
VAL 
“AL? 
OAL 
¥ata 
AALS 
wALA 
e417 
weyA 
Aaq9 
BALA 
44h 
aie 
vain 
Ale 
QaLtF 
aaga 
OP2t 
W422 
¥wAQr 
HAVA 
aags 


wuvivsvuoaeavuoeuvv~dived«iivovoesvi#vsedd=»«~V 


RARE 


CS5r 


74AAB 
arge 
grav 
vos) 
Haar 
797? 
7074 
VPar 
C7C7 
2AAad 
3FFF 
CRAP 
AFI? 
CNer 
7A 
ay 1S 
7c? 
Shue 
RAA4 
C5a7 
YvAgse 
AUDE 
Adda 
YADA 
APDK 
vAgéK 
uepe 
GAS! 
AAS 4 
AAIAR 
HiAQR 
AAVT 
yess 
4163 
“~rgé 
PCQK 
ae 
wAQR 
¥728 


Table D-6. 


NSR e TsO CALL 


vier 
A1oz 
viodg 
0195 


A194 
A197 
vig8s 
aAqIgo 
wear 
A?PA1 
READ 


AAS 


AQ@AaZ 
APAe 
agar 
“ev? 
agua 
APAaAS 
aeie 
aA?Pi 
W712 
“218 
AP1e 
A el 
AALE 
vei? 
0218 
nP1s 
Aa22°e 
4221 
A?2F 
A?2y 
VP24 
A928 
Usoet 
0227 
Q@228 
u2e¢ 
“rae 
“231 


ISNT 


TOENT 


Data Terminal DSR Listing (Continued) 


FNT 


Fed 
FQU 
RMN 
@BRL 


NATTA 
DATA 
AR, 
ARI. 

F QL: 

rnro™ 
REC 
ANY 
RMN 
CPA 
SGF 
RAI 

LOA 
TOROM 


TORUS WRITF,MATA,A 


LOA 

RMN 

DNATA 
PATA 
DATA 
MATA 
DNATA 
NATA 
MATA 
DATA 
DNATA 
MATA 
AAT A 
Pata 
DATA 
DATA 
MATA 
MATA 
NATA 
YAT A 
MATA 


RY 


§ 
L,A 
TSNSRY 


ISINT 
ISRST 
SETRIG 
SFYT“TG 
$ 


SHEET aaa7 


@ave SVC RETIIRG @ 
TINYITTALIZ7F S!tiR PROGRAM 


INTEPRIIPT ENTRY 
RESET ENTRY 
TNITTALI7E REAM VECTOR TON TENOR 
INTTTALIZE WRITE VECTOR TO IGNORE 
STARTING PAINT FOR I/O CALLS 
GET T/A PPCNNE 


LOAD, A,PRA,PRANPC 


arFF 
A,X 
218 


NPC VER 


PNTSTA,AR 


$42,% 
A,P 
RNASCT 
OPCOER 
WTASCT 
OPCNER 
OPCNER 
OPCOER 
OPCDER 
OPEN 
OPEN 
CLOSE 
CLOSE 
WRTEQE 
EXTEOR 
RNSTAT 
OPCNER 
OPCNER 
JENAR 
IGNNOR 
TGNOR 


LEGal NPFOnE ? 
NO, FATAL FRROR 
GET TNTTTAL STATUS 


TNITTALIZE INTERFACE 


RRANCH VYA TABLE 


aA 
o} 
22 
m3 
A 
O85 
a6 
a7 


REAM aser? 

RFAN AYINARY 

WRITE ASCTI 

WRITE BTNARY 

RFE WINN 

BaCK SPACE RECORD 
FNRWART SPACE RFEFCARN 
OPEN 

QPEN REWIND 

CLOSE 

CLOSE WRITE ENDeNFeFILE 
WRITE ENN OF FILE 
CHANGE RECORD LENGTH 
REAN PEVICE STaTus 
BaCK SPacF FILE 
FORWARD SPACE FILE 
UNLOAD 


ee 
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Table D-6. Data Terminal DSR Listing (Continued) 


BaP RAL 
NaTa TERMINAL DSR «© T/0 CALI FNTRY SHFET Ager 
“ase PES 
“Ade APEX NPCNER FAI §& FATAL FRROR FNTRY 
YWAQR C7C7 ase rorar FATAL FRRNR 
W227 427209 ADSS FXTT ARORT,TLLAPR 
VAQR WASH TENOR FH § 
AAQR CICF AST TNCcOM SET PRR TRNARE Fiat 
Hit2Q ARAX AISs8 RIT SFT,PFR, PPBSF ,PRATPI 
WAZA FROA ASS PRIi FYTFOR 
veer wear CLOSE Fl §& 
vase Creo 68a) SEV xX CLOSE “WRITE FOF ? 
“WeQr TFRAR WPas PRi EYWTENE NT 9) . 
voor “74% WRFOF FQ! § 
Pa2ZnN pear “Dae LNA BL F3LET VES, SEND 3 LINE FFENS 
P “72F K1CS 
APQF F499 APA™ RRL #XXLYST 
w4ga JADA u24e RRI EXTENF 
Aaa? * 
A743 HED DATA TERMINAL ASR @= TATERRUPT ENTRY PINT 
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SAP ROLF 


QatTa TEPMTNAL 


As, 
BAS? 
Q@A33- 
WAZA 
BASS 
AASB 
Ve 47 
WAGSB 
ASD 
wAga 
WASR 


6ASe. 
Wa Sly 
AaaQe 
WADE 


UAGIA 
G4 ai 
Weg? 
BAAR 
O44 
nit4§ 
OA4K 
AW4a7 
BadgA 


a% 


UA AQ 
wuda 


Neen n ena 
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GAsis 
17a! 
C7.G7 
3rar 
NAge 
JAGA 


PAad- 


TANG 
Caat 
C7C7 


SAY? 


7PBE 
aase 
CAaadé 
C7C7 
3RUP 
7917 
“Uaae 
CAa! 
c7c7 
GRAF 
nrRas 
7aSP 
NRAA 
7R5R 
RF 7F 
7 4yny 
AAA 
UYAAP 
7m16é 
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Data Terminal DSR Listing (Continued) 


NSR » INTFREUPT ENTRY POINT 


A246 


e2sc 


uo54 
4782 
a2s2 
vse 


0284 


arse 
A287 
2958 
“25% 
A?P6T 
A264 
U?02 
wr6s 
A262 
A26% 
UNPKEe, 
A?67 
a268 
W264 
vOPe 
A271 
“e7e 
Ag7s 
VOTE 
427% 
Ad7E 


0277 


‘AI7R 


W276 


ISINT 


WRT INT 


RNINT 


PE! 

FOU 6 

Loy ajo 

Taras 
TOPUS READ, DATA,A 
TARZ @ 

RRi} RAINT 

TARZ 1 

RRI! WRIINT 

CRx § 

TNrOM 

TNRUS WRITE, MATA,X 
RQ!!! EYTNiIRM 

FQll & 

CRY 4 

ToC Oa™ 


TORUS WRITE, NATA,Y 


ARI) ePDTWVC,AP 
FQU 6§ 

CRY $ 

racas 

TORUS BHRITE, Nata, s 
TARZ 3 

ARI! EYTNR 

TARZ 4 

RRI' EYTNR* 

ANN ap7F 

eARL TPCHAR 

HEN DATA TERMTNOL 


NASR e OPEN 


SHFEY #aag 


INTERRUPT ENTRY POINT 


INITYALIZE TA CLEAR INTERRIIPT 


READ INTERRUPT If, 


REAM INTERRUPT ? 
VES 
WRYTE ITNTERRIPT ? 
YES 


ASSUME STATUS CHANGE INTERRUPT 


CLFAR WURTTFE INTEMRIIPT 


RERANCH VYA WRITE VECTOR 


PLEAS PEA INTERRUPT 


TEST FRAMING ERRNR 
TEST TIMING ERROR 

MASK STATUS BAITS 

CHECK SPECTAL CHARACTERS 


NO, ARANCH TA ®Ban VECTOR 


ANA APEN RFWINA 
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SaP 29LPr 


NATA TEKMINAL D&R = 


vegr 
AU4GA 
wean 
Ov 4F 
Ai ae 
gage 


ans) 
vusga 
“Ags 
BAS4 


6ug§s 
AASB 


P 04$7 
P GASA 
Pp 4use 


ve aR 
7°Or 
ARAR 
74k 
C7C? 
asBs 
7RAA 


wns) 
C7C7 
A383 
vues 
7404 
aags 
C7C7 
4noe 


a1an 
ayec 
wy@r 


Table D-6. 


voa 
waa 
vir by 
ures 
VOR 
vos 
u2BF, 
“rar 
was 
rT 
uror 
2991 
wogr 
yoo? 
M204 
298 
aooe 
a297 
A998 
v906 
asar 
ase 
vyas 
asazy 
vse 
asas 
arae 


Data Terminal DSR Listing (Continued) 


NPEN AND APFEN REWTNA SHEET ania 
PE) 
* NOTR: TSRST MIST FOLLAW @ARL TCRKHAR & BRU #POTRVC,BR 
TSRST FOU § CANCEL T/N ENTRY 
RRI SFTPTA SFY PEAN VECTOR TN IGNORE 
LMA XY¥RKAR 
RRI 8 eXXL IST SEND CR/LF 
Tora™ CLEAR LINE FEER TGNORE RIT 
PITT CLEAR, PAT,PRTNEV,PNTLFT 
RRii EXTEQOe FYTT THE NSR 
tJ 
OPEN Fal 6§ 
TOCO™ CLFAR IGNORE LINE FEFA FLAS 
RIT CLEAR, POT, PARTNEV,PDTLEY 
| Da ¥YCRLE 
RRL wY¥XLIST SEND CRLF 
EYTFOR FO 8 
TOCOM NASR ENNeAFeRECARA FXTT 
FXTT ENR,@ 
® 
@ 
* 
XYCRLF DATA XCRLF 
XXBKAR MATA XRCKAR 
X¥LIST DATA XLIST 


* 
* 


HEN DATA TERMINAL DSR » READ ager? 
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SaP ROLE 


OaTaA TEPMINEL 


Casa 
@age 
waAse 
“avysn 
ASE 
wose 


BAG” 
446) 
BAG? 
Qerags 
¥ABA 
YAKS 
CAQB4K 


AAG? 
wngR 


6469 
4254 
YABB 


ener 
nagn 


wUbe 
BABE 
Aazsa 
aA7i 
waz? 


Wwi73 
P wA7A 
waA7s 
waz 
vor? 


av7a 
0979 
WAT A 


PAA 
oaryc 
@azn 


P AATF 


VORA 
C7C7 
121F 
7JaaF 
C7C7 
MAF 
AyAAa 
AaARe 
cA~as 
C83 
84 ar 
C7C7 
20uR 
R146 
FRA 
a%67 
AGRO 
74FC 
“aeKeo 
C7C7 
vii 
7REFP 
Arse 
C7C? 
29a? 
GC 6F 


C707 | 


ae 
7ABD 
V7a7 
7979 
v77S 
voar 
¥v16F 
#116 
7004 
7A 


AOTR 
Laas 
9116 
C857 


ya7yRr 
veawe 
8117 
C557 


“eA? 
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OSR e@ REAR ASCII 


AS@? 
P3Aa8 
asyae 
asi¢ 
@331 
asyie 
¥31y 
aAs%1é4 
“31% 
a31¢ 
ASL? 
“sis 
a31¢ 
ASQ 
A214 
“32e 
AS2% 
Ase 
0325 
v326 
us27 
4328 
“A329 
Asa? 
ARS 
A337 
33% 
W33e 
W335 
a33F. 
AXS7 
us3e 
asad 
“sae 


asa} 
Usae 


Ax4%, 


AS44 
V34% 
AAS 
“asa? 
“34a 
AI4S 
ASSL 
ayS51 
ASSE 
a35? 
ARS4 
“35e 
v8S¢6 
“357 


OTWREP 


CHGTBL 


RHUBAUT 


RNASCT 


ONINP 


RNGREL 


NANTRE 


@ 
SFTRIF 


® 


* 
SFTWIS 


* 
XEXNRM 


PEJ 
FQ! 
Torom 
RIT 
RAI 
roco™ 
RIT 
LDA 
Eau 
RAN 
RM 
STA 
Toro™ 
REG 
STA 
RRL! 
FQU 
LDA 
ARI 
FQ 
TNC OM 
ATT 
PRI 
FaU 
TOROM 
REG 
FQ 
TOC OM 
RTY 
Rpgl! 
Da 
ARI 
FQ 
@_na 


STa 
FRI 
BRI 


FAI 
Ly 
STY 
RMN 


FOU 
LDA 
STA 
RMN 


CATA 
HEN 


Data Terminal DSR Listing (Continued) 


SHFET Amdt 


$ 

SFF TF ALREADY THROUGH LOOP 
SKIPO,PAT,PRTFLG,PDTOWR 
DOINP VES, GET THE RFP! Y 

NO, SET OUTPIIT WITH REPLY AIT 
SET, PAT, PNTFLG,POTOWR 
aA SET UP PRR ARIAS 
8 SET UP NEW PRB AND NR Anes 
A,™M SET HIP NEW PRB ANNRESS 
MA 
PNTPRR,AR SAVE IN PNT 

RET NEW DNATA BUFFER ANNRESS 
LOAD, A,PRA,PRANRA 
PONTORA,AR SAVE IN PNT 
TOENT 
§ FNRTFR HERE YF RUAQIT INPUT 
XX¥RK AR 
*X¥XILTST SEND BACK ARROW, CR, LF 
% 

AUTPUT WITH REPLY ? 
SKTPA,PHA,PPAUFL ,PRANWR 
NTWREP YES 
$ 

7TEPON INPUT RFCARND LENGTH 
STOVE,F, PSR, PERDRL 
& 

SUPRFSS FELL ? 
SKTPZ,PPR,PRBIIFL ,PRASAL 
DONTRE YES 
ZREILL 
WRTCHR wRTTE THE CHARACTER 
§ 
eTAKCHR SFY 'iP RFANS VECTAR 
PATRVC,8&R TO ACCEPT NEXT CRKAPACTER 
SETYTA 
EYTHRM 
$ 
XFXNR SET RPEAD VECTOR 
PATRVF,|R TO IGNARE FURTHER CHARACTERS 
L,P 
$ 
XFXYNRM SET WRITE VECTOR 
PNTWVC,AR TA IGNORE FURTHER TNTERRIIPTS 
1.,P 
EYT“' Ris 


oT, DSReCHAPACTER INTERRUPT YNPHT , 


CANTINUFND 


a 
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Table D-6. 


NT. NSPeCHARACTER 


“ATF 
was 
WiAAads 
QNBA 


WARS 
WAaA4 
Bags 
@4a8 
2:A87 
VagR 
wAgg 
WUABA 
BABR 
aage 
@38n 
AYBE 
OUBF 
BAga 
@agt 
BA92 


@ag3 
eaga 
“ags 
BARS 


@a97 
vAgA 
8499 
Q@AQA 
YA9R 
enoe 
gagn 
QaQF 
voor 
Waar 


AMTF 
776C 
C7C7 
UP {TF 
7FER 
wees 
GF7F 
coayv 
JAE 
OP SR 
C7C7 
Baar 
6789 
Chee 
7307 
DRAI 
7AL4 
C7R«A 
49oue 
7AQO— 
C7B8A 
7ALC 
aegs 
DRAY 
7AQN 
DABA 
7AQr 
Ad? 
C7C7 
LAF 
7807 
Bila 
C7C7 
AQF 
ATAA 
795? 
7°DA 
“11a 


4358 
vikS¢ 
AxBe 
v3sét 
A362 
¥36% 
A364 
AXSH* 
Us6E 
Ar67 
AXKR 
A36S 
Aare 
as7i 
AS7TS 
A37% 
AS7Z 
Aa37% 
“37e 
A377 
“378 
AS7S 
AxBC 
A381 
asa? 
assy 
asec 
8388 
asec 
Q@387 
u388 
a3das 
A39Og 
8391 
8392 
“39% 
U3sO4 
8398 
A3s9F 


Data T 


erminal DSR Listing (Continued) 


TNTERRIIPT INPUT , POITINIEN SHEET ani? 
PE J 
CLRSCF FN §& 
FRI WRTCHE 
racg™ 
RYT CIEAR,POT,PrTFLG,POTLES 
MRI RMASET 
TAKCHA FQ § 
CPA sRUHOT RUR AUT ? 
SNF 
RR RHBOUT YES 
SARO 8 SET MSR AF CHARACTER TN 4 
toco™ STORE TN USER'S AUFFFR 
CHAR PIIT,A 
CPL sTAR TAS ? 
SEN 
RRI! CKRIIFE if 
TARZ 1 WAS RUFFER ALREANY FIILL ? 
RRil EYXTAIRM . YES, DON'T AN ANYTHING 
REx ™,B NO, POINT BASE TO PRA 
OMT PPBNRL,RR RENUCE CHARACTER COUNT RY 1 
RRU $44 NECESSARY NOP TN CASF NF SKIP 
REX M,B RESTARE RASE TA PHT 
RRII CHKEOF RHFCK FOR ENNDeNFaf TLE 
mKBUFF FOU § 
TABZ { WAS RUFFFR ALREADY FULL ? 
BRI =EXTNRM YES, DON'T NN ANYTHING 
TARZ @ RIN WE JUST FILL BUFFER ? 
BRI} FULLBF YES, SFE IF AUTO TERMINATE 
CHKLFR FQL & 
TOCcO™M SEF TF LF BEFORE EfHn 
BIT S$KIP1,PNT,PNTFLG,POTLFB 
BRI} = SENNCH NQ, ECHO THE CHARACTER 
STA TEMPI,8R SAVE THE ECHN CHARACTER 
TOCOM CLEAR LF BEFARE CHO FLAG 
BIT CLEAR,PNT,PATFLG,PDTLEB 
LDA aLF 
BRL XMTCHR SEND THE LF 
BRL SEFTWIF SET WRITE VECTOR TN TGNORE 
LOA TEMPY,BAR RESTORE THE FCHO CHARACTER 
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Table D-6. Data Terminal DSR Listing (Continued) 


SAP ROL: 
Oele MSPaetHARACTER YNTERRUPT INPUT , PONTINUEN SHEET anis 
A397 PE J 
OAAS @398 SENACH EOI 


$ 
WAAL F7A4A ASQC PRL Ww 
O%A2 B4Ae YVHNT FO Fg 
APA? wv4sAt YVRAT Fou & 
“AAD AAAS EXTNRM EQU §& 


RTCHR FOHO CHARACTER TO TERMINAL 


©9342 C7C7 840% toro NORPMAL OSR EYIT 
GAAS AAP A4HES FXIT NORM,A 
ACA4 WM4AZ FIILLBF EQu $ COME HERE TF BUFFER JUST FULL 
O%AA CTCF B4BE TOCOM AUTOeTERMINATE ? 
AXAS JRIL2 A4B7 RIT SKYP{,PRB,PRBIIFL,PRRATM 
WAAR JAFP AAR PRI} CHKLFR NO 
OAA7 FAOP B4Aas RRL SETRIC NISCARD FURTHER CHARACTERS 
BAAR PAF Yale PRL SNNCHR FCHO THE CHARACTER 
@AaG FRAS V4li RRii = CHKEOF CHECK FOR END eAF oP ILE 
W412 « 
vais 
- BSL! * 
PAAA A41® GATACR EQ § FNTER HERE ON CR INPUT 
GAnmA WUFAC WA1E LOa XYCRLE 
@AAR C7C7 A4L? Toco™ SUPRFSS CR/LF FCHO ? 
AAAM {ALS Bata RIT SKIP1, PPA, PPRIIPL ,PRASER 
“7am FRSM Wats PRL XLIST SEND CR/LF 
AAAF 7ACO Baer ARI SFTRIC YTGNORE FURYHFER YNPUT 
AWMAP 2421 CHKFOF FQI' § 
WAAF SIP AAagne LOA #PNHNTHRA, BFE 100K AT FIRST WORA IN BLFFFR 
VAB™ BRUP 42% @CPA BFEFNIFTL FN eNFeFILE ? 
@VA4 AFAA 
WARD CNAR naee SEN 
WARS FRAY AAQEe RRI' EXTEOR ‘M, FXYIT DSR 
G34 CIC? HA2e Toros LOK AT TNPUT COUNT 
WAGS Q2UA2 A427 FER LOAN, A, PRR,PRADR 
G7BR AFAL A428 CPA #4 TS IT AT LEAST 2 ? 
A%B7F CNUG B426 SLT 
¢7BR FAQOK W4B ARI! EYTFNR NO, FXYY NSR 
WAKQ C7C7 43} Tora“ YES, SET ECF FLAG YN PRB 
VAXA PRAD WAABS RIT SFT,PFR,PRRSF! ,PRAENF 
HABR = FRQGO N4AS% RRil EYTFEOR FYTT NSR 
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Table D-6. Data Terminal DSR Listing (Continued) 
SaP ROLES 
MeT.e MSFRPHARACTER TNTERRIPT TNPUT , PONTTINUEN SHEET 014 
aay PE 
PVBr @438 RACKSP FOU 8 ; FNTER HERE TF RACKSPACE TNPUT 
Qaar “CICF wade TOCOM LONK AT TNPUT ROUNT 
A289 214P wUs3?7 REG LOAN,F,PRA,PRAASL 
YPKF CFBL L438 SNZ E TS YT ZERO 7? 
#9RF FRED wW4aSS RRIl EYTNRM VES, EXIT nsr 
omer C707 waar Tornas TS PRINTER RACK SPACABLE ? 
YVaAts {RBA UAat RIT SkKYIPL,PAT,PRTPEV, POTRCK 
“e9C?2 w75C VA? LOA eRKSLSH NO, ‘JSF PACK SLASH INSTEAD 
V4™CS 7°24 a4ay RRL SNNCHR SEND RACK SPACE AR SILASH 
U9C4 F7VBR AAAS FRL SET*#IG 
WHCS C7C7 “44s TOrOM LOnK AT TNPUT COUNT 
VICK PIP WA REG LOAN,F,PRR,-PRRANPL 
VOC? C711 64647 POF E€,E MECREMENT CHARACTER COUNT 
BACH ICT 468 raco™ PLY RACK ITN PRR 
¥A0d 29n2 “n4be FEG STORFE,EF,PPS8,PRPRARL 
VACA C7C7 48° Tongs SEF YF LF AFTER RS 
0309 {RRP AAS RIT SKYIP{,PRT,PRTREV,POTLFE 
¥vAcChr FRAP ~AbSS RRI' RACKS4 NON'Y SET LF BEFARE ECHO BTT 
eren C7C7 48% roco- SET LF BFCQNRE FCHO BIT 
OACR wALF 48Z RIT SET,PPT,POTFLG,POTLFR 
Wwecr B2488 RACKS FOU & 
WPCr CARI AAKE SNZ CE 
VAC FAN AAS? ARI) FYTNR 
@91 C707 8458 Taca™ CRI? 
W499 {RRA WASS BIT SKIP1,PNT,PRTREV, POTFFH 
AMAA 7ZACF A464” RRI' FXTNRM aT) 
WANDA AYR YAB4 LDA PNATNEV,AR 
viens gRae ywasoe @atf) a>FF “aSkK WIOHTR 
VONR (rrF 
YA? oFusd A46By Sue srs 
Wie BIB? VUNABS STA $43 
¥4ADD W7Ar B46® (DA av 
VA SRAP BAKE eOntv stot 
VaNR Paag 
0°DR CFA V467 SZF F 
YWayn 7RCS A468 BRI! EY THM 
SADE v7ie 46S LOA ef Rue 
Ware FREI “va7y” RRI: SFNSCH 
A471 ° 
W472 «& 
APES wWA7% LINFER Frit & FNTER WERE TF LF INPUT 
WIE ' AAA WATS LNA Y¥XRKAR 
P @*E1 wnAsR ' 
CA9ED2 FOR WATS RR| XLIST SEND BACK ARROW, CR, LF 
WPES R919 Aa7Te STF PATNCT,AaAR 7ERQ OUTPUT COUNT 
AVEA Fa3rp WATT PRL LSTIIN 1I8T THE YNPIIT RECOARN 
ANES C707 “na7& TOLOM CLEAR LF REFARE FCHN RIT 
WAER APPLE YWa7s RIT CLEAR,PNT,POTFLG,PDTLFB 
AUF? FRBA WARe RRt = RNGREI ACCEPT FURTHER INPLIT 
v4at we 
“4B # 
n4Ba% HEN DATA TEPMTNAL NSR e& CHARACTER TRANSMISSTON 


a 
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Table D-6. Data Terminal DSR Listing (Continued) 


SaP RALC 

DNATA TERMINAL DSR «= CHARACTER TRANSNISSTON SHFEFY fai 
AaBS PES 
VL We PEREEEEECEEESSESOSAEEOESORSEERILAESESISCISCS ELSA SSIES LASE LS 
A46E « 
@487 « SIBROINTINE TO SENT ANF CHARACTER FROM THE AwREGISTER, 
Q4QR « RETURN YS WHEN CHARACTER TRANSMISSION YS COMPLETED, 
A489 « 
VV Ot SERAERESESSERESSEESORSESLOSTSISCE CCC ESSEC SSSI L SSCL LSAT SS 
Aagi 

BAER A4Q2 SNDCHR FOU §& 

AER C551 “4ags RMN L,E 

WAES BO17 Hage STF PNTNWVO,AR SAVE RETI'IRN TN WRITE VECTOR 

QAFA Fant HnsQFs RRI =OWRTCHR NUTPHT THE CHATACTER 

QAEP 7BRE Y4AOe BRU EXTNRE FXTT O8R 
W497 © 
BAQR eRe RHR EERE REE OHEE THEE ETE HEREHENERTETUTERTERHREREE EER ES 
“49S 


QS5arv « SIBROUTINE TO SEND ANF CHARACTER FROM THE AeREGTSTER, 

“5A, «# RETURN TS IMMEDIATE, 

ASA « 

Dol Wn CSP ES ERPS ESSEEC ESOS ECCS ESE SSIESSE EIS S LAC SECS ASLIELEL SSCL TS 
A®EC ASHS WRICHR FOU § 


QAET SFFF ASA AND = 

PAEN DRABt AKA S$aRQ { SET INTERFACE TRANSMIT BIT 
QPEF C707 aAsAT Toaca™ 

@agEF JRae ASAB TORUS WRITE, DATA,A 

EAFA C857 o8as RMM L,P RETURN 


D-63 Digital Systems Division 


943005-9701 


saP rROeLe 


Nala TENMINAL 


CAF fj 
AAFO 
GA 
VA 4 
BiAkF Ss 
werF 
AA 7 
wuFR 
roa ee 
VARA 
PAPA 
P BAF 
Wur’ 
orFE 
viiPF 
2{ ue 


B1as 
YAP 
vias 
Wid 
vius 


¢1 Ae 
P 0147 
“ian 
wiaa 
WLAA 


1A 
VIAC 
eIyMn 


Wi AF 
B1AF 
O11" 
11} 
e142 
O113 


w1it4 
@4145 
wii 


CHARACTER TRANSHISSTNS 


Data Terminal DSR Listing (Continued) 


SHFET Aagr{A 


orrerrrrnre re © eee eC CE CEPR EOE ESE RES ER ES EERE ER ERED ASLO 


SIIBPOQUTINE TN SFND SINGLE CHAPACTERS, 


EXCEPT SPECIAL 


CHARACTERS ARF CONVERTED Th 


THE NFCFSSAPY CHARACTER STRINGS, MAY ALSO RE ENTFRED 
XLIST TO SEND A PREMSPECTFIED STRING, 


'NSAGF TS STMTLAR 


AT 


SEWERS HERE HET HERER ER ERER EHS REHEKREH PERERA ETHHE HaHa 


Table D-6. 

DSR e 

asqer PES 
VSL 

ARID «& 

“Sis e 

vS1 4 e TO SNDCHR, 
vSif «# 

ASLO « 

W817 « 

A518 

“¥Sis XYMTCHR FAI 
Ae? Amt 
~S91 CPA 
ASQS SNE 
wso. RR 
AROZ CPA 
As2% SNF 
“Sor RRII 
asa? CPA 
US2R SEN 
YSeag RR! 
“Sar @LNa 
A531 TOfLO™M 
YV532 RIT 
v535% aon 
viSSde RRI! 
gS3" YXLF FQ 
ARSE. LOA 
A837 TARZ 
As38 PRI! 
8395 LNA 
asa? RRII 
¥54i  XCR F ryt! 
Asa? OLA 
—p54d roro™ 
vhaZ RIT 
uS4% ADN 
AS46 XLIST FAL 
us47 STA 
A548 RMN 
wsac STF 
“SS? LSTLUP Fol: 
“851 LDA 
“v&§2 TARZ 
AS52 RRI! 
AR5S IMN 
ae5% RRI 
“Asse RRI! 
AS57 SKPI_F Fiat! 
ASSA SARZ 
AS§9 STA 
“AS6? FMT 


§ 
aen7F 
afk 


XR 
ar 


XIF 
afr 


SNDOCHR 
sFFULST 


COPRIAGE RETIIRN ? 


VES 
LINE FEED ? 


YES 
FOPM FEED ? 


NO, JUST TREANSMTT AS ITS 


SEF IF HOME ON FORM FEFO 


SKIPO, POT, PRTNEV,PNTFFH 


@HMLSTeaF FIST 
XLIST 

§ 

POTYEV,AR 
PNTLFT 

SKPLF 

XI.FLST 

XLIST 

§ 

BCRILST 


PRANGE CHARACTER LIST ADR 
SEND FORM FEFD ENUTVALFNT 


SEF TF LF TGNNRE RTT SFT 
IGNORE LINE FEED 
SEND LINE FEFD EQUIVALENT 


SEF TE MNE NULI AFTER CR 


SK IPA, POT, PNTNMEV,POTINL 


BCRILSTeCRI1I ST 


% 
TEMP?2,B9 
L,E 
TFEMPS,RR 
$ 
*TEMP2,A8R 
1 
*#TE¥P3,AR 
TEMP2,BR 
SNNCHR 
LSTLUP 

8 

POTLFT 
PNTNEV,AR 
LP 


REND THE CHARARLTER LIST 
SAVE LIST TNNEX 


RPETLPN ABR 


RET A CHARACTER 

END AF LYST ? 

YES, RETURN 

NO, TNCREMENT TNNEX 
AND SEND THE CHARACTER 
NO NEXT CHARACTER 


PESET LF IGNORE ATT 


RETLIIRN 


a  ———————————— 
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Table D-6. Data Terminal DSR Listing (Continued) 


SaP ROLC 
DATA TEPMINAL OSR = CHARACTER TRANSMISSION 
“564 PES 
117 S62 LSTILIN FOU 8 

W117 CSS8° 686% RMN L,A . 
A118 B11R ANKS RTA TEMP1,AR 
vw1i1t9 C7C7 a86% » TOCO™M 
OijA SRA USBE _ CHAR GET.A 
vil ORAL “867 -TARZ | 
wiit 7OYe S68 . PRI wTE4*PY, RR 
0140 SF7F wdS6S ANN ee7F 
AI1F 6F10 AST CPA so 40 
VidtF 6CnNce| AS7S SLF 
212% 7RAas Us7Te ' PRI} CHA®NK 
0124 BFIA AS7® CPA =s>14 
W129 CHAR ABTS SLT 
123 az7ee ASTe {OA e@Nilee 


9124 US7E. CHAROK FOL §& 
0124. 70Cl as877 RRL OMMTCHR 


SHEET @aai7 


LIST USER BUFFFR AN TERMTNAL 


SAVE RETURN 
GET & CHARACTER 


RUFFFR EMPTY ? 
YES, EXIT ROLTINE 


TF THE CHARACTER 18 IN THE 


RANGF AF »{a TN »14 
CHANGE IT TN A NULL 


0, SEND THE CHARACTER 


¥V125 C7C7 “S78. TocoM SEF TF FORMATTED OI'YTPUT 
WV12A {R893 BRITS PIT S§KIP{,PRA,PRBIIFL ,PRRFAC 
#127 JAF AsaG ARI LSTLINe? 
W12R B11R Amat LDA PNATNEY,&8R LONK AT REVICE DFSCRIPTINAN 
¥129 R43 ASAD SARZ PNOTLET CLEAR THE LF IGNORE FLAG 
OI19A BITR C8B% STA PNTNEV,ARR 
v12R 3FFE vsAg ANN a>FF CHECK CAPRTAGE SIZF 
v12C 6912 BSBS CPA PNTNCT,8R FQUAL TO OUTPUT COUNT ? 
¥129 CNER ~AKBE SE 
G12F REA ASA? PRI} LSTLI' 492 NO 
@12F v740N OSAR LOA #fR 
0133 7ACR AKSBS RRI XMTCHR SEND CARRIAGE RETURN 
2131 wana7y asgr LOA XLFLST POINT TO LINE FEFD LIST 
¥139 C7C7 v591 Toco NTN DEVICE NN TTS OWN LF ? 
¥v133 4387 ASR RYT SKIPA, PNT, PNTHEV,POTLFA 
0134 2704 “S93 Ann wef YES, SKIP THE LF 
13% 7eDK BSE FRi »=xXLIST SFND LF OR LF/CLR FOL 
8138 C7C7 A59% roco™ SET THE LF IGNORE FLAG 
0137 wvRABSs Yy8OF RIT SET,PNT,PATNEV,PNTLFYT 
443A FREA 8597 BRI LSTLING? 60 ON MNRE 

ASO8 « 

ASQS «# 

P2139 yiCS) abae XL FILSY PATA LFELST 
ABU * 


WBS HEM DATA TESMTNAL DSk @» WRITE ASETY 


a 
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Table D-6. Data Terminal DSR Listing (Continued) 


gaP ROLC 
Nata TERMINAL NSR w WRITE aSCTT SHEET AiR 
afar PEJ 
AaY3A ABAL WTASCT FOU §& 
UL 3A BOLE AKUS STF PNTOCT,&R JEPN ONTPLIT COUNT 
“13H C7C7 asae Toro™ FORMATTEN NUTPUT 9 
wisr {AG aku? RIY S§KIP1,PRA,PRBIIFI ,PRRFAC 
wian 7REK BRB PRI! SNDILIN NQ FORMATTING 
wItSF S112 ABAS IMM PNRTACT,RR TNCREMENT PAST FORMAT WORD 
¥V1SF S811? waete I™N PNTOCT,PR 
14" AS1>2 AAL4 LboA #PDTNRA,AS LANK AT FORMATTING worn 
Pid! ppar B12 TARZ POSFRY POST FORMATTING ? 
142 79°04 aay ARL LSTLI* YES, LIST THE RECNRNA 
0143 7AA7F AALS RRI FORMAT NO FORMATTING 
W146 O64%  SNOLIM FQUr § 
0144 7°nN2 wéie RRL LSTLIN AUMMY CALL IF ALREADY NONE 
¥145 wie AGL? LOA PATFLGE,AR LONK AT POT FLaG8 
W44K PRYF A118 TARO PNTOWRe WAS THIS AN OMUTPLIT WITH PEPLY 
@147 7FABI BA1S RRIi FXEFORYX NO, WE APE FINTSHEN 
214m A7FC BREF LDA se4 RESTORE ORIGINAL PRB AAR 
149 7CUOP ARQ) @BRU CHGTAL PESET PRR ANA NB ADRS 
P A144 YEP 
ABQ « 
ve23 HEM DATA TERMTNAL DSR ew FORMATTED OUTPUT / REAN STA 
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gaP ROLC 


Table D-6., 


naTa TERMINAL DSR @ 


AY 4A 
wider 
oi 4t 
41 4F 
Ai 4F 
#152 


“15! 


#152 
“iss 
154 
wiS5 
#154 
157 


“v4 5R 
0154 
4458 
619° 
241$n 
I SF 
“tse 


H16 
v1.61 
W142 


4445S 
W144 
¥16% 
visa 
“167 
W168 


2169 
“Hi6a 


1 4R 
C852 
aq 
usie 
NAGA 
FRAP 
avec 
7A°9F 
0152 
AS1P 
DROE 
7043 
DRAF 
7RAS 
7NqR 


A7AA- 


7aQ7 
vsieP 
NRF 
7MiAR 
(A7AA 
7°99 
VAs 
P16 
ayar 
7 ARF 
rans 


a1i6% 
Ct7c7 
see 
3Age 
BALE 
C7C7 
2AU? 
¥169 
C7C7 
aRaoa 


M624 
AB2E 
vR2e 
ASQ? 
VR28 
AB2S 
ARS. 
BAS1 
aB63F 
ASS 
ABS4 
63% 
UESE 
AR37 
A838 
BRIS 
akar 
“eat 
VRE 
uk 4% 
VRaL 
WR AS 
AK 46 
UK a? 
O48 
AR AS 
vbse. 
Wk5 1 
aARk52 
4655 
W682 
ABSS 
ARSE 
A657 
“658 


ARSE 
As67 
AS61 
w662 
H662 
BABEL 
ABBS 


Data Terminal DSR Listing (Continued) 


FARMATTED OUTPUT 7 READ STATUS SHFET aa49 
PES 
FORMAT EQI' §& 
RMO L,A 
STA TEMPE, Ae @AVE PETIION 
[DA #POTDRA,BR LONK AT FORMAT worn 
TAPN CRFORM CARRTAGE RETIIRN 9 
RR! NOR NO 
LOA BCR YES 
RRL XMTCHPR VES, SEND YT ONT 
NOCR Fol' § 
LNa #PNTNRA, BR LONK AY FORMAT WORND AGAIN 
YARZ LFFRM LYNE FEEN 
RRU FMTLE VES 
TARZ FFEFORM FORM FRFEN 9 
PRI FMTPFF YES 
BRI «TEMPY,AR NOTHING AT ALL, RETURN 
FMTLF FAL §$ SEND #1 LINE FEEN 
LDA stF NO 
RRL XMTCHP SED THE LINE FEFEN 
LOA wPOTNRA, AR LONK AT THE FORMAT WAR 
TARO LFOFR™ SELOND LINE FEED ? 
RRIt eTEMPY,aR NO, RETURN TA CALLER 
LOA eLF YES 
BRI XYMTCHR YES, SFNP TT OUT 
RRI wTEMPY,AaR YHEN RETURN 
FMYGF FQ § 
LDA eFF 
BRI XMTCHS SEND THE FORM FEEN 


RMOSTAT 


FYENRY 


PRI! #TEYP1,AR 


FOU 8 6§ 

Toros READ INTERFACE STaTUS WORD 
TORUS REAN,DATA,A 

@AND 2>801F 


toca™ RETURN ITN PRA 
REG STOPFE, A, PRB, PRADRL 

EQ!' & 

rorgm 

EXYTT ENR, 


HEC MATA TESMTNAL OSR @ CRARACTER INTERRUPT INPIIT 


a el 
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Nata TERBINAL 
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{sR 
vii AC 
v6) 
wf OF 
VI AE 
w{i7s 
P17 4 
Yv4i7> 
@t7s 
W474 
278 
0174 
0177 
Wi7A 
A479 
Vi7a 
e{7R 
170. 
wi7n 
OIL7F 
Wi7F 
BiRA 
0181 
01a9 
6383 
0164 
0185 
“4864 
2187 
014A 
8189 
18a 
618 
vier 
eqan 
Q18¢ 
O16F 
Bigs 


C191 
6199 
e193 
8194 
6195 


6194 
0197 
@t98a 
0190 
C194 
@19R 


Table D-6. 


¥16R 
BF eV 
Cnae 
70ar 
C8ae 
1241 
C%?7 
AAA? 
Ala? 
AAA? 
Ara? 
AAD 
OAD 
“rap 
ASAP 
Beare 
oetges 
nv1gée 
AAD 
AUP 
AAA 
WAED 
@PA2 
GAAD 
(PAD 
QAa? 
QBAAP 
AAAQ 
PAA 
GAAP 
BAA? 
O7A2 
OF AQ 
@1i AR 
OAAQ 
vig9t 
UAAQ 
ZAAQ 
QA7F 
191 
C&O? 
C7C7 
2982 
C3a0 
7AQBA 
“align 
C802 
C7C7 
2102 
O11A 
JAGe 
Garp 


NSR =- CHARACTER INTFRSUPT TMNPHT 


ABBE 
W667 
ABR 
“RHO 
e4a7? 
AK71 
BRITE 
ARTS 
ARZTL 
HAZE 
“s7E 
C677 
AR7B 
ABTS 
ARB” 
ABB1 
BRae 
848% 
AGBS 
BeBe 
BKBE 
UsK87 
A6RB 
ABARC 
2490 
0491 
ABgGe 
ABO 
“B94 
BROS 
BEOE 
AKO? 
a698 
8699 
8700 
8791 
A782 
a7a3 
8704 
A788 
A706 
Ava? 
“708 
A789 
a7ie 
4711 
A712 
871% 
O714 
a718 
8716 
47137 


TAKCHR 


XFXTNR 


RIGARR 


DWNARR 


PE J 
FQU 
CPA 
SAT 
RRII 
PMA 
LOX 
RMN 
RATA 
RATA 
PATA 
MATA 
PATA 
PATA 
NATA 
PATA 
Nava 
NAaTA 
MATA 
NATA 
Pata 
CATA 
MATA 
NATA 
NATA 
CATA 
DNATA 
DAT & 
DATA 
NATA 
CATA 
DATA 
MATA 
DATA 
DATA 
PaTa 
DATA 
NATA 
AATA 
DATA 
FQ 
RMO 
TOCO™ 
REG 
RIN 
ARI 
EQUI 
RMA 
Taco™ 
REG 
LOA 
@ANO 


Data Terminal DSR Listing (Continued) 


SHFET anon 


§ 

wren 

wY TAK H 

A,X 

$e2,X 

X,P 

EY¥TNRM O® NULL. 

FYTNRM | 

EXYTiRM 02 HOME CURSOR 
EYTNRY' ay 

EXxTR™ 4 

EXYTNRM 75 

EX TAIRA a6 

EXYTNR™ AZ BELL 

BACKSP AAR RACKSPACE OR FURSOAR LFFT 
TAKCH AQ AARTZQONTAL TAa® 
DWNARR PA LINF FEEN OR FURSAR NOWN 
EYTR™ AR 

EX TNR aC FARM FEED 
GNTNACR AD CARPIAGF RETURN 
LYINFEN AE LYST INPUT LINE 
EXTNRY AF 

EXTNRM 1a DLE 

EXTNRM 11 

EX TNRM 12 PRINT 

EYTNR™ 13 

EXTNRY 14 0C4 

EXTNRM {5 

EXTNRM™ 164 

EXTNRY 17 CLEAR END OF LINE 
EXTNRM 18 

EXTNRM 19 

UPARRNA {A CLRSOR UP 
EXTNRM 18 

RIGARR 1€ CURSOR RIGHT 
EXTNRY in 

EXTNRM 1€ 

CLRSCR 1° CLEAR SCREEN 

8 

A,X 

LOAN, A, PRB,PRADRL 

A,A 

DWNAR{ 

$ 

A,X 

LOAN, F, PRA, PRADRL 

POTNEV,AR 

apPPr MASK WYOTH 
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SaP RALES 
jaTa TERMINGL 
0190 2FQa? 
¥19N Cage 
AL9F 
@19F C7C7.. 
@19F {RBA 
Q{an 7fOe 
oi A4 C7C7 
BA? 2183 . 
PiasS C41? 
@ia4 Chan 
241a5 7CCR 
A1AE 
viA6 6 =CIC7 
C1A7 282 
ayaa CS2P 
BiaQ 7Cae 
P 601AA APA 
AAR 
V1AR €7C7 
@iar = 1RB4 
e1aNn 70C3 
AIAE C€7C7 
WiAF 21820 
A184 AiR 
vi8t 3Aane 
0182 BAaFF 
41483 PFAP 
a1a4 Ca4je 
4185 Chae 
18h Z7CBA 
“(87 Cray 
WiKA CRY 
¥is9 {718 
6194 7ARER 
P @18R “788 


Table D-6, 


CSR @ 


8718 
“71s 
a72¢ 
A721. 
A722 
A723 
A724 
A722. 
A726 
“727 
“728 
a7v2e 
Aa73e 
“7si 
A773 
“73% 


ATS4 
A732 
a7 Sf 
4737 
“738 
A739 
a7 4¢ 
W741 


“742 
a7var 
A74ae 
a7 4% 
A7 46 
A747 
“748 
A74S 
47 5¢. 
“751 


CHARACTER INTFRRUPT TNPIIT 


NWNAaR 4 


DWNAR? 


UPARRN 


XTAKCH 


SUR 8>2 

RAN E,A 

FO! 6 

TOCOM CRT? 


RIT SKIP1,PNT,PRTNEV, POTFEH 
BRIi #XEXTANR 


INCOM 

REG LOAD,F,LOAT,LOTOPC 
RCa E€,A 

SGT 

RRIl wYEYTNR 

Fol 6 6§ 

Taras 

REG STORE,A,P&B,PRANRL 
RMN YX,A 


@BRU SFNOTR 


FOU §$ 

raecam™ CRIT? 

RIT SKIPL,POT,PARTAEV,POTFFH 
RR owY¥EXTNR NQ 

TOCOM 


REF LOAS,F,PFRA,PRANRL 
LOA PRTDEV,AR 


@AND w>FF MASK wWTtDTH 
SiR s>2 

RCA EA 

SGF 

ARI] #YEYTNR 

RSIl A,E 

KMM OE,A 


1Dx¥ eClyRUP 
RRI! DWNAR? 
RATA TAKCH4 


Data Terminal DSR Listing (Continued) 
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HEN DATA TERMINAL ASR @ SPEFTAL CHARACTER LISTS 
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Sar ROLE 


NATA TERMINAL 


“wiee 


WiRA 
1 BKE 
Har 
vice 
wiC}s 
1c? 


WICK 
“ita 
Ona) 


wits 
e107 
W1CR 


w1C9 
e1Ca 
W1ICR 
wice 
vicn 
viCcr 
wiCF 


W104 
101 
6109 
8108 
#104 
G1 
104 


#197 
@10R 
#109 


01a 
¥10A 
eior 


“iBe 
Lol d 
AtBD 
ar ar 
veer 
vraag 
vaae 
vFaAG 
Vaqa 
vics 
Avs 
“m1? 
AAA? 
aAI1c« 
CORA 
VODA 
UOWR 
¥™1C9 
AAA 
“writ? 
BOOA 
vir{? 
RAWA 
PAL? 
Arg? 
P1DP 
vayn 
vena 
AvrAD 
aaa 
vrae 
AAAaA 
4200 
e107 
gran 
AAA 
4eAae 
AiDAa 
AAW? 
gat? 
4°60 


Table D-6. Data Terminal DSR Listing (Continued) 


AZT 
A7 5%, 
AT HL 
U7 5" 
vu7s¢ 
AFA? 
A758 
“759 
A746? 
A764 
VIE 
“7ay 
U7 O64 
w76* 
A76F 
A767 
U76R 
U7BS 
a77C 
A771 
A772 
AZ, 
AV7~ 
vu77* 
A776, 
“777 
0778 
A779 
Ava? 
A7B1 
A7 ae 
A7 BY 
AFR 
V7a% 
ATA 
787 
41788 
4789 
0797 
“791 
879% 
“79% 
A794 
A795 
Aa7ge 
a797 
4798 
u7gos 
gAae 
VROt 


“RBS 


NSR 


= SPEFTAL CRARACTER LYSTS SHFET aaap 


PES 
TT RRR RR PRESPEC ESE SER ECE REE ERE RE ERE RE REE SERRA RARER ELE ESSE | 


LISTS SEN RY THE XI I&T StBROIITINE, TRANSMTSSTAN 
IS TERMINATED BY RIT 4 OF THE WORE FOLLOWING THE LAST 
CHARACTER TM SE SENT REITING @ET, 


¢**#t¢ & & 


ROMA EHTS HOHE AETETHEREKRETEHEEHEHRHTE REET HEHES 
2 
XROKARP FOL $ 
RATA BCKARP 
XC RLF FQ & 
AATA CR 
PATA NULL 
NATA Nt'Le 
DNATA NULL 
DATA NULL, 
PATA Of4 
LFLST Fri §& 
MATA LF 
NATA CLELIN 
PATA P4A30 
FFLST Fit § 
RATA LF 
NATA LF 
NATA LF 
LF3LST FAU § 
DNATA LF 
DATA CLRLISX 
PATA LF 
MATA CLRLIN 
RATA LF 
MATA CLRLIN 
NATA DADA 
CRILST FQ $ 
PATA CR 
PATA NULL 
PATA NULL 
RATA NULL 
PATA NULL 
DNATA NULL 
DATA x»4AAG 
CRELST FAU §$ 
PATA CR 
DNATA NULL 
HATA RPa4Qrnge 
HMLST FAQU § 
PATA HOME 
Nata CLRLIN 
HATA >4008 
HEN DATA TERMINAL OSR @ AUTAFLOW SOURCE 
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Table D-6. Data Terminal DSR Listing (Continued) 


SaP ROLC 
NaTA TERMINAL OSR w ALITOFLOW SOURCE SHEET @aa23 
ARAL PEJ 
Ave YRDE FNN spt 
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Table D-6. Data Terminal DSR Listing (Continued) 


Sar ROLE. 

JATA TERMINAL DSR & AHTOFI Oe SOIIRCTE SHFET aned 
A AG IAD ARQET ar at R AvAR RACKS{ UAANF 
BACKS AGRE R RAKSP ANAR RPKARD ASF BELL ana? 
BrT aS aR AKSI SHR acdsee RR AU AY CHAe BAAN 
CravnK ale4 CHGTBL ange CHKFOF amar CHKLFA ang? 
CLRE IN ary? CLRSCR ac7F CR avan CRILST ana 
Cra st win? CREFARY ARAN CHRIIP AAA HATA ange 
DR4 AG {4 R OLE Ary, DOTNP AaAKe NDOANTRG Aa7s 
UWNAR{ ALOF DENAR2 @AAK NYNARP AOA E aaa 
ENDF TI. AFAA FAR AVA EXENRY A169 EXTT BY An 
EXTFOF ars FXYTNRMN AAD FF avac FFENRM Q00F 
FFLST = =aicA FMTFF 864160 FMTLF 815A FORMAT G414R 
FILL BF avad GET vAAR GATACR Atha HML&T AINA 
HOME ava? ICCHAR apa IGNOR aror ILLAPH AAADg 
Ings 8408 INCnM™ C7C7 INFANT AAA? ISOSRT anan 
TSoT aver TSINT Aas] ISRST aAA4R R IVRNT oma? 

R Ivwnry vva2 L Aa9s LT aroo LOTOPr paas 
LF APAA LF2FRM araF LF3LST wvic9d LFFORM @anF 
LFLST AICS LINFEN aE Laan aaga LSTLIN att? 
LSTLUP G1AE M AAAS NOCR a15o NORM ange 
NULL agua OPCNER aAr2k OPEN aasi OTWREP GQASA 
P ara7 pnt Ara POTINI @7as PNTACK AAAA 

R PNTRSY Araa PHTNBA arya PNTPEV APIA POTFFH anna 
POTFLE arad POTLFA AaaAa7Z POTLFR ange PrTLFE aaae 
POTILFY @e@3 R PATHXN Of14 PHTNCT «agi? PATAWR AAaF 
PNTPRR aran PNTRVE aet{A PNTSTA aris PNTWVC aa47 
POSFRM wapac PRB aeaa PRBATM apag PRANBA @aa3 
PRBNRL ava? PRBFOF ana2 PRBFAC anas PRANPe anal 
PRANPT Breads PRBNWR array PRABSBIL aaAas PRASCR aand 
PRBSFL Pan PRBIIFL aa! PUT AOA RMASCY 8969 

R RNCON Besa RNMINT AAD ROSTAT A163 REAN gaa6 
REG B84Aa RIGARR 4191 RNGRE| ANGE RUBOT Pad 
RUBNUT APB? SENDCH Amat SET arn) SETRIG Ba7—8 
SETWIG BA7— SKIP@ agae2 SK YP} Aras SKPLF A144 
SNOCHR APEA SNOLIN A144 STORE anas TAB aaeo 
TAKCHYL A083 TAKCHR A6R TREMP aaa TEMPO aai9 
TEMPS OALA UPARRO @1AR WRITE ACAy -WRTICHR Q@AEFC 
WRTFOF gaen WRTINT aggre wraSCY aida x ean2 
XACKAR O38C XCR ALAG XERILF aiBA XEXNRM GATE 
XFXTNR A174 XLF ALAL XLFLST atso XLIST 81a" 
XMTCHR AF 4 XTAKCH A@4BR XXAKAR ASA XXCRLF 287 


XXLIST wes 


Aaer ERRORS 


i 
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Table D-7. PDT Builder Required Definitions 


ITDBTO 


Pointer to the internal IO expansion PDT branch table 


should be used by the PDT Builder program when a block of 
memory is required in the system. 


| IT DBT 1 Pointer to the Ist IO expansion PDT branch table 
| ITDBT2 Pointer to the 2nd IO expansion PDT branch table 
| ITDBT3 | Pointer to the 3rd IO expansion PDT branch table | 
IT DBT4 Pointer to the 4th IO expansion PDT branch table | 
ITDMT Pointer to the DMAC expansion PDT branch table 
ITVECT Label indicating the start of the vector interrupt PDT branch 
table 
ITPDT1 Label indicating the start of the 1st PDT in the system | 
SDMAEX Label on word containing the DMAC expansion flag: | 
0 - no expander | 
| 1 - expander | 
| SDBEXP | Label on word containing the number of I/O bus external ex- | 
| pansions, value: 0-4 | 
SINTEX | Label on word indicating that there is internal I/O expansion | 
| QO - no internal expansion | 
| 1 - internal expansion 
IDDMAC , Label indicating a word that returns control to the system 
| when no processing is required on an interrupt. This label 
may be used in PDT words 12 and 17, or may be branched to 
| when the processing required to clear an unsolicited interrupt 
i is complete. 
JDSCAA Pointer to a system memory managed area. This pointer 


The utility requires some memory allocated permantly for the PDT and any 
other structures required by the new device. This memory block should be 
at least 18 words (more if temporary storage is required). To allocate this 
memory space, the utility has access to one of the system memory manager 
routines. The following is the calling sequence for the memory allocation 
(MRAL) routine: 


REF MRAL 
REF JDSCAA 


(listing continued on next text page) 


eas 
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GET MEMORY 
FOR PDT 
STRUCTURE 
( >18 WORDS) 


USE MEMORY 
MANAGER 


ITPDT 1=LABEL 
FOR 1ST PDT; 


CHAIN THROUGH 


SET POSSIBLE 
DEVICE ID 
=254 


_CHAIN THROUGH 
PDOT'S TO 
DETERMINE 


SELECT 
RESULT AS 
NEW ID 

FOR POT 


(A)130254 


Figure D-10,. Addition of New PDT 


EOS Be ned LAST PDT HAS 
TO + A ZERO IN POINT— 
CHA ER TO NEXT PDT 


LINK NEW 


POT 
INTO CHAIN 


INITIALIZE 
1ST 18 WORDS 
OF PDT 


ADD POINTER 
TO INTERRUPT 
BRANCH TABLES 
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@LDA JDSCAA 
STA ARGI#i 

@LDM =ARGI 

@BRL MRAL 


ARGI DATA 3 # of arguments 
DATA $-$ 
DATA BLKADR 
DATA BLKSIZ 


BLKSIZ DATA $- $ Size of block needed 
BLKADR DATA 0 Pointer to requested block . 


Upon return from the MRAL routine, determine if the requested block 
was given to the PDT Builder utility. If the pointer to the requested block 
(BLKADR) is zero, then the memory was not available. 


The PDT Builder utility has access to a label indicating the start of the first 
PDT in the PDT chain, To determine a suitable device I1,.D, number, select 
the largest, non-assigned device ILD. (<255), Chain down through each PDT 
to determine if the selected 1,D. is assigned. The last PDT on the chain is 
identified by a 0 in the Next PDT Pointer field (WORD 0). 


After assigning a device 1.D., chain the PDT to the last PDT on the list and 
initialize the PDT according the description provided in figure D-2. Then 
place the PDT pointer in the appropriate PDT interrupt branch table as 
described earlier in this appendix. 


Once the PDT builder program is coded, assemble it using SAPG. Object 
output should be to the file (USERO1, ASMOUT). Then link it with the DX980 
operating system using DKOLE. The following job control is required to do 
this using the standard LINK procedure. Refer to Section VIII for a detailed 
description of the DXOLE utility. The following is a sample Link: 


//RUN DXOLEP DOB1=DISC1 DIN=SC; 
.. FLM = (SYSTEM, UTLFIL) RLM LLM=(3, 0, 32, 3) 


The input would then be as follows: 


BSUBSYSTEM OVLY 

BROOT MAIN. 

BSEGMENT 1 

bINCLUDE 1 object for PDT utility 


sl. 
an 


re 
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D.3 ADDING THE NEW DEVICE SERVICE ROUTINE 


Every DX980 has a standard utility, LMUPDT, that updates a memory image 
phase (MIP) of a load module generated by the DXOLE utility. LMUPDT can 
replace any of four dummy memory image phases (MIP Nos. 181, 182, 183 
and 184) in the DX980 system load module. 


Perform the following procedure to update the DX980 load module: 


1, Reference the description of the load module update (LMUPDT) 
utility in Section VII of this manual. 


2. Perform this update procedure using the <userid> of SYSTEM. 


3. Run the standard LMUPDT. Set LUN 5 to the record input device. 
This record should be the MIP number of the system load module 
MIP to be updated. Set LUN 7 to the relative record file of the 
DX980 system load module, (SYSTEM, SYSLD). The input is as 
follows: 


//RUN LMUPDT DCON=SC FLM=(SYSTEM, UTLFIL); 
FUPD=(SYSTEM,SYSLD) 


4. Once the phase has been replaced, reload the system via the IPL 
program. 


This utility does not replace an existing module. Instead, it adds a module 
to the end of the File and changes pointers from the old MIP to indicate the 
new MIP. Therefore, after replacing the MIP several times in the process 
of testing and debugging, LMUPDT may terminate with an error indication 
such as ''file full''. To prevent this problem, build a development system 
load file using the load module copy program (DXCOPY). The new file should 
be large enough to allow for expansion. Once the MIP has been tested, this 
file may be deleted. Then run.the update utility against the system file or 
disc. 
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ALPHABETICAL INDEX 
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ALPHABETICAL INDEX 
INTRODUCTION 


The following index lists key words and concepts from the subject material 
of the manual together with the area(s) in the manual that supply major cov- 
erage of the listed concept. The Reference column of the listing contains 


Vee 


8 Sections - References to Sections of the manual appear as "Section 
x'' with the symbol x representing any numeric quantity. 


8 Appendixes - References to Appendixes of the manual appear as 
"Appendix y'' with the symbol y representing any capital letter. 


® Paragraphs - References to paragraphs of the manual appear as a 
series of alphanumeric or numeric characters punctuated with deci- 
mal points. Only the first character of the string may be a letter; 
all subsequent characters are numbers. The first character refers 
to the section or appendix of the manual in which the paragraph is 
found, 


® Tables - References to tables in the manual are represented by the 
capital letter T followed immediately by another alphanumeric char- 
acter (representing the section or appendix of the manual containing 
the table), The second character is followed by a dash (-) anda 
number: 


Tx-yy 


e Figures - References to figures in the manual are represented by 
the capital letter F followed immediately by another alphanumeric 
character (representing the section or appendix of the manual con- 
taining the figure). The second character is followed by a dash (-) 


and a number: 
Fx-yy 


@ Other entries in the Index - References to other entries in the index 
are preceded by the word ''See" followed by the referenced entry. 


Index 1 Digital Systems Division 


(e) 
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Subject 


Area, Job.Extension 
Assembler, Symbolic 
Assign Command 


Batch Input Reader 
Batch Input Spooler 
Batch Output Spooler 
Binary Code 

BIR 


BIS 


BLDEDT 

Block, Physical 
Record 

Blocking 


BOS 
BPS 


Buffer, Data 
Exchange 

Buffers 

Build Edit File 


Calls, Supervisor 

CATFIL 

CATFIL Error 
Messages 

CATLOG 


CATLOG Error 
Messages 

Clear LDT Bit 
Utility 

Clear PDT Bit 
Utility 

Clear PRB Bit 
Utility 

Close 


Change l 


ALPHABETICAL INDEX 


Reference | Subject 
1e8.-2 Code, Memory 
8.9 Resident 
2.5.4 
; Code, Hollerith 
S BI ‘ 
ses, Code, USASCII 
See BIS . 
Code, Binary 
See BOS 
Command Scanner 
T3-9 
Error Codes 
6.1,.\6s2; 
Command Scanner 
1.4.3, 1.4.3.1, 
8.54.4 Command Table 
a 1. : 3 Compact Control 
14.8: base. ee 
Compact Mode 
8.14 ° 
Compiler, 
FORTRAN IV 
D251 oe 
Conditional Instruc- 
ce mee Meo eee oe re Sli 
4.4.2, 2.5.3.2 pee *P 
6.1, 6.4, soe 
bee 3, Ve 4e3%3 Ceenga Task 
let. eae 3, Cc i 
Le 7odh. 23-04 aera 
1.4.2 
4.4.3.5 vie 
8.14 Data Command 
324 
8.4 Debug, Program 
° DEB980 
T8-7 Delete 
8,3, 2.4.1.3, 
wlelet 
nes Delete Record 
T8_5 Device Service 
Routine 
Device Service 
Ds2e see 
Routines, Reentrant 
Device Table 
Dees ox2 4 
Physical 
Devnam 
D.2.3.2 ; 
ey ee Parectony: Master 
File 
Index 2 


Reference 


S 
S) 
ws 
ios) 


md 
nN e 


iw) 


e 
W W 
we 


2 


NONNWAOADKDD NNNF W@W NWN 
. e oo ee oe @ 
NW Oo U1 CO CO W WN eFeoP OF W UI 
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Subject 


Directory, User 


DSCA 


DSR 


DSR, Sample 


DXCOPY 
DXCOPY Error 
Messages 
DXOLE 
DXOLE Error 
Messages 


Editing 


Editor, Master File 
Directory 

Editor, Overlay 
Link 

END 

Enter File 


ERRCOD 
Error, Fatal 
Error, Logical 


Error, Severe 


Error Codes, Com- 
mand Scanner 

Error Messages 

Error Messages, 
CATLOG 

Error Messages, 
CATFIL 


Reference 
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“ 
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) 


ee) 
Ne 
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T5-6 
Appendix A 


T8-5 


T8-7 


Index 3 


ALPHABETICAL INDEX (Continued) 


Subject 


Error Messages, 
DXCOPY 

Error Messages, 
DXOLE 

Error Messages, 
SAPG 

Error Messages 
Phase 1, FORTRAN 

Error Messages 
Phase 2, FORTRAN 

Error Messages 
Runtime, FORTRAN 

Errors 


Errors, I/O 
Event 


Event Index 
Exclusive 
Execute 
Erecute T/ 


Exit DSR 

Extend 

Extended Physical 
Device Table 

Extract Mode (SMR). 


File 


File, Key Indexed 


File, Linked Se- 
quential 


Reference 


T8-15 
T 8-10 
T8-19 
T8-21 


T8-22 
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i 

ine) 
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ALPHABETICAL INDEX (Continued) 


Subject Reference Subject Reference 
File, Relative 
Record 4.4.2, I/O Errors D.2.2.5 
11 = Pan ee I/O Manager Dz21 
2.5.4.9, F4-2 IFE (2; Vek? 
File, Saved F8-6 Include Control Card 8.5.4.3 
File Copy 8.7 Index, Event 5.9.1 
File Features Last Initiate I/O 3.5, 5.16 
File Integrity 2.5.4.10 Insert Record Tiesees 
File Manager See FILMGR Integrity, File 2.5.4.10 
Utility Interactive File 
Fileid D65-23 Editor See IFE 
2e4512:3, Interactive Terminal 
Ave ae ee Subsystem See ITS 
2.5.4.6 IOCOM DeZ 53s] 
FILMGR 8.16 ISDSRI D242 54 
Filnam O36 14851, ITFDIO Gih~e2o oss 
2.4.1.4, ITINIT ler 
255.466 ITPBIO C.1.3, FC-4 
Find Record eae ame | Itrks APE oe es 
Find String fe are. ITS De Ay ete, 
Flags Ce ee ane Le fed 22 3645 
3.36252; 2.4.2.1, Section 
Su 362.3 7, Appendix C 
Formatted Records Sia, ITSUPV C.1.4, 
On 5heee, 1.4.2, 
3600262, Ca ledge z, 
ee = ee as a Ge dels 3: 
3.8.6.1 FC-5 
FORTRAN ae o Se ly Takes 4.2, 
FORTRAN Error ICL . = 7 
Messages Phase 1 T8-21 , 30] eee 
FORTRAN Error Sueticn > 
Messages Phase 2 T8-22 : 
FORTRAN Error ate EGR ERE: , 
Messages Runtime 10.2 a. ne 
FORTRAN IV Com- Tone eo 
pee tee JCLTRN a 
EEC Stare? Ee Jcsnam Di tet 2: 
GET Routine D.2.3.7 2.4.2.4 
fs Hollerith Code T3-8 pee ae ~ 
JLDT De ly. 5 E202 
prey, 
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Job Command 


Job Extension Area 


Job Queue 
JSB 
Jsname 
Jsprty 


Key Indexed File 


Keylen 


Latency Time 

LDT Bit Utility, 
Clear 

LDT Bit Utility, Set 

LDT Word from 
Register, Store 

LDT Word to Reg- 
ister, Load 

LIBBLD 

Library 

Library Builder 

Library Control Card 

Limits 

Link Editor, Overlay 

Linkable Parts File 
Build 

Linked Sequential 
File 
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Subject 

List 

List Edit Files 

List Record 

List User File 
Directory 

LMUPDT 

Load LDT Word to 
Register 

Load Module 

Load Module Update 

Load PDT Word to 
Register 

Load PRB Word to 
Register 


Logical Device Table © 


Logical Error 


Logical Record 


Logoff 
Logon 
LPFBLD 
Lrecl 
LSTEDT 
LUN 


Manager, I/O 

Master File 
Directory 

Master File 
Directory Editor 

Memory Image 

Memory Image 
Phase 

Memory Resident 
Code 
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ALPHABETICAL INDEX (Continued) 


Subject Reference Subject Reference 
Module, Load F8-4, T8-12 Physical Device Table 1.5, D.2.4 
MRAL Memory Allo- Se diihe de 
cation Routine D.2.9.4 TD-1, FD-2 
Mtrks oe Physical Device 
26034511 Table, Extended FD-3, 
D.2.4 
a i Physical Record 4.1, 4.2 
NEW LIB 8.12.4 Physical R d pear’ 
Normal Control Card 8.5.4.3 Ee res, caer 
Block See PRB 
normal Mose eee Pool, Procedure 1.6 
NOV LY 8ebe4e2 : ts 
Nprty Tao ie Pee eects 
Nucleus 1.4, 1.4.1 Sate ae ea 
; 3.5, 4.2, 
Object Control Card 8.5.4.3 4.5, 
OLD 24 5¢4,5 Celiele t; 
OLDLIB 8.12.4 Ded: 
Opcodes T4-3, T3-2, See dw 
T3-5, T3-10 F3-3, F3-4 
OPD Sey Sal PRB Bit Utility, Set DeeeSee 
Open 4 PRB Bit Utility, 
3.8.1.6 Clear De 2e32 
Overlay Link Editor 845 PRB Word from 
Overlay Manager, Register, Store D..2¢504 
Runtime 8.5. 461 PRB Word to 
Overlays, Pre- Register, Load D.2.3.4 
planned S50 4ed Preplanned Overlays 8.5.4.1 
Overlays, Unplanned 8.5.4.2 Procedure Pool 1.0, 
Pass 2e 5.4.4 134 las 
Password 1.8.2 Program Debug 8.8 
PDT Bit Utility, Prot oe D% 309 
Clear Di2.352 Prty (ihee Po re) 
PDT Bit Utility, Set Die Sac Prwds 23 Date dd 
PDT Builder Utility D.2.9.4 Pseudo Time Slicing OF ere) 
PDT Pointer Table FD-6, FD-7 Pswd 2.4.1.4, 
PDT Word from 225.4. 10 
Register, Store D.2.3.4 PUT Routine De 267 
Peete: Read I/O Bus to 
Register, Load D.2.3.4 . 
Phase. Memory Register D2 25.3.5 
image F8-4. F8-5 Read Operations 
: Timeout 3.8.1.19 
Record 1.8 
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ALPHABETICAL INDEX (Continued) 


Subject Reference Subject Reference 
Record, Formatted Oe Se Ces Scanner, Command 5,15 
3.6, SCRASH Ds2.2%6 
Se Gale cy Search Control Card Suey 5 
S604 Oe k, Segment Control 
34.0, be 1 Card 8.5.4.3 
Record, Logical 4.1, 4.2, Set LDT Bit Utility D262 
Le. er Ae Set PDT Bit Utility Dy 25 ac 
4.4.3.7, Set PRB Bit Utility Ds, 2e 5% 
2.5.4.13 Severe Error ern Ena 
Record, Physical 4.1, 4.2, ere cre 
Leek Share on Dees 
Record, Unformatted 3.6 STCBFL Lesxi,; 
Reentrant Device 2.4.1.4, 
Service Routines Dis 2s 9ak DA LS 
Relative Record File 1.8.3, Skip, Conditional 
4.4.2, Instruction Dy2e3e5 
a4 Oe, SMR 8.12 
F4-2 Source Maintenance 
Release 2.5.4.4 outine 8.12 
Remote Job Entry See RJE Spooling 6.25.63; 
Replace Le Dees 6.4 
2e5.4.5 STATUS 7.1.6, 7.4 
Replace Record Uses eee Status $6 8.Ded5 
Replace String Tide C003 3.8.1.17 
Vetets ft Step ely Cees 
RJE 15 2.562 
Root Control Card 8.5.4.3 Stksiz rare Pree eae 4 
Routine, Device Store LDT Word 
Service D.1, D.2 from Register D.2.3.4 
Run Command 2.4, 2.4.2, Store PDT Word 
Oveue,; from Register D.2.3.4 
61562, Store PRB Word 
(als; from Register Doe 3e4 
Pe3u:2 Subsystem Control 
Runtime Duby Ceone Card 8.5.4.3 
Runtime Overlay Subsystem Mode Seo 
Manager 8.5.4.1 Supervisor Calls 245, Se 1, 
SAPG 8.9 ne A 
SAPG Error aa 
Section 5, 
Messages T8-19 TS5_1. T5-2 
ae er Spiele kesenbes. “6.0 
Saved File F8-6 Ue ree e S 
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Subject Reference Subject Reference 
SYSIN Os 2v aed Unformatted Records 3.6 
6534355 Unplanned Overlays 6s-534.2 
SYSOUT 6.4 Update Mode (SMR) Ss12.45 1; 
System Console Le Se des 8.12.4, 4 
2.3.4, USASCII Code T3-7, T3-8 
7.1.3 User Control Block See UCB 
System Disc 1.8.1 User Directory 4,3, 1.8.1, 
System File Lid. ft, 138.3 
2.4.1.4, Userid Tile Ss 
2.4.1.5 Ap ee ee) 
System Output Utilities Section 8 
Queue 6.4 ; 
System Table 1.4.1.1 Verify Mode (SMR) — 8. 12. 4.2, 
Sloss 
Table, Command 1 46:2 wala 1.8.1, 
Table, Extended 2.4.1.4 
Physical Device D.2.4, FD-3 
Table, Logical Wait Se Dd 
Device D324 5; Wait Criteria List See WCL 
Ce leled: Wait for I/O 5.16 
TD-3, FD-4 WCL By Je ky bad, 
Table, PDT Pointer FD-6, FD-7 F5-2 
Table, Physical Write I/O Bus from 
Device 165; De2u4, Register De2s345 
Gel. tet, 
TD-1, FD-2 
Table, System 1.4.1.1 
Task bel aa, 
betes 
Leis 
Task Control Block (ees Ee 2 
Taskid bd 
Teleprinter tele e 
Temp 2 Dee 
Time 244 5e4 
Time Slicing Pseudo Gst.3 
Translator, JCL Ce oeas 
ae a 
Trknum 4.3, 
rao Pee an 
UCB C.1.4, 
1.4.2, TC-2 
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